在线观看亚洲精品专区-在线观看亚洲免费-在线观看亚洲免费视频-在线观看亚洲欧美-欧美freexxx-欧美free嫩交video

VIP標識 上網做生意,首選VIP會員| 設為首頁| 加入桌面| | 手機版| RSS訂閱
食品伙伴網服務號
 

用Word宏給打印機“記工”

放大字體  縮小字體 發布日期:2006-06-09

員工上班要打卡、計件,打印機工作是不是也要“記工”呢?把打印的文件名、打印時間記錄下來,可從方便管理員了解打印機的使用情況,這種應用對一些公用電腦顯得非常有意義。

在一般的辦公室里,使用打印機最多的非Word莫屬,我編寫了一個Word宏,當有人打印文檔時,宏就被激活并執行,將打印任務記錄在一個文本文件中,供管理人員隨時查閱。下面介紹實現方法。

??第一步:
??啟動Word,單擊菜單[工具]→[宏]→[宏],在“宏名”框中輸入宏名“FilePrint”,單擊[創建]按鈕。

??第二步:
??在彈出的Visual Basic編輯器的代碼窗口中完成以下內容:

??Sub FilePrint()

??Dialogs(wdDialogFilePrint).Show

??DName = ActiveDocument.Path + "\" + ActiveDocument.Name

??If ActiveDocument.Path = "" Then DName = "未保存文檔"

??Tim = Str(Date) + " 日 " + Str(Time)

??Open "d:\langzi.dat" For Append As #1
?
??Print #1, "于 " + Tim+ " 打印 " + DName

??Close #1

??End Sub

??Sub FilePrintDefault()

??ActiveDocument.PrintOut

??……(重復上面第3至8行內容)

??End Sub

??第三步:
??錄入完成后,單擊[保存]按鈕,再單擊菜單[文件]→[關閉并返回Word],全部操作完成。

??上面的代碼包含兩個宏,第一個FilePrint宏在用戶執行[文件]→[打印]菜單命令時自動運行,第二個FilePrintDefault宏在用戶執行工具欄上的[打印]按鈕時自動運行,宏在運行時首先執行正常的打印操作,然后提取所打印文檔的路徑和文件名,以及當前日期和時間,并將這些數據寫入到d:\lanzi.dat文件中(此文件可在代碼中修改)。用記事本打開這個記錄文件,打印過的文件都詳細的記錄在案

 
[ 網刊訂閱 ]  [ 食品專題搜索 ]  [ ]  [ 告訴好友 ]  [ 打印本文 ]  [ 關閉窗口 ] [ 返回頂部 ]

 

 
推薦圖文
推薦食品專題
點擊排行
 
 
Processed in 0.094 second(s), 171 queries, Memory 1.26 M
主站蜘蛛池模板: 99热热热 | 都市激情亚洲综合 | 在线观看永久免费视频网站 | 四虎影院国产 | 岛国毛片一级一级特级毛片 | 一二三区在线观看 | 色多多www视频在线观看免费 | h黄视频 | 久久精品国产免费看久久精品 | 成人剧场 | 日木69xxxhd | 免费观看在线观看 | 韩日一级毛片 | 22222se男人的天堂 | 欧美一级黄色片视频 | 久久精品国波多野结衣 | 天天搞一搞| 直接在线观看的三级网址 | 四虎影院成人在线观看 | 欧美三级 欧美一级 | 天天射天 | 国产1区2区三区不卡 | 国产精品主播在线 | 亚洲美女视频一区二区三区 | 校园 春色 欧美 另类 小说 | 国产成人在线影院 | 天天躁夜夜躁狠狠躁躁88 | 男女吃奶一进一出动态图 | 亚洲精品网站日本xxxxxxx | 午夜黄网 | 五月丁香六月综合缴清无码 | 午夜老司机永久免费看片 | 日韩一级一片 | 国产香港三级理论在线 | 成zzzwww日本免费 | 久久观看视频 | 亚洲小便 | 天天射天天干天天 | 日本一区视频在线观看 | 亚洲网站免费 | 欧美ggg666|