1. 首頁 > 生活百科 > >

用Word宏給打印機“記工”推薦閱讀

Word電腦知識

【用Word宏給打印機“記工”推薦閱讀】 員工上班要打卡、計件， 打印機工作是不是也要“記工”呢？把打印的文件名、打印時間記錄下來， 可從方便管理員了解打印機的使用情況， 這種應用對一些公用電腦顯得非常有意義 。
在一般的辦公室里， 使用打印機最多的非Word莫屬， 我編寫了一個Word宏， 當有人打印文檔時， 宏就被激活并執行， 將打印任務記錄在一個文本文件中， 供管理人員隨時查閱 。 下面介紹實現方法 。
第一步：
啟動Word， 單擊菜單[工具]→[宏]→[宏]， 在“宏名”框中輸入宏名“FilePrint”， 單擊[創建]按鈕 。
第二步：
在彈出的VisualBasic編輯器的代碼窗口中完成以下內容：
SubFilePrint()
Dialogs(wdDialogFilePrint).Show
DName=ActiveDocument.Path+"\"+ActiveDocument.Name
IfActiveDocument.Path=""ThenDName="未保存文檔"
Tim=Str(Date)+"日"+Str(Time)
Open"d:\langzi.dat"ForAppendAs#1
Print#1,"于"+Tim+"打印"+DName
Close#1
EndSub
SubFilePrintDefault()
ActiveDocument.PrintOut
……（重復上面第3至8行內容）
EndSub
第三步：
錄入完成后， 單擊[保存]按鈕， 再單擊菜單[文件]→[關閉并返回Word]， 全部操作完成 。
上面的代碼包含兩個宏， 第一個FilePrint宏在用戶執行[文件]→[打印]菜單命令時自動運行， 第二個FilePrintDefault宏在用戶執行工具欄上的[打印]按鈕時自動運行， 宏在運行時首先執行正常的打印操作， 然后提取所打印文檔的路徑和文件名， 以及當前日期和時間， 并將這些數據寫入到d:\lanzi.dat文件中（此文件可在代碼中修改） 。 用記事本打開這個記錄文件， 打印過的文件都詳細的記錄在案

    推薦閱讀