在线观看亚洲精品专区-在线观看亚洲免费-在线观看亚洲免费视频-在线观看亚洲欧美-欧美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
主站蜘蛛池模板: 午夜精品网站 | 国产你懂的在线观看 | 亚洲国产视频网 | xxxx免费大片 | 色网站免费在线观看 | 国产欧美亚洲精品 | 看全黄大片狐狸视频在线观看 | 久久国产高清字幕中文 | 欧美一级三级在线观看 | 你懂的手机在线视频 | 国产成人永久在线播放 | 欧美二级黄色片 | 国产黄色录像视频 | bt天堂网在线资源www | 欧美黄色录像视频 | 成人高清毛片a | 不卡午夜 | 好爽好紧好大的免费视频国产 | 国产小视频在线免费观看 | 六月丁香色婷婷 | 亚洲日韩色图 | 性国产精品 | 亚洲香蕉毛片久久网站老妇人 | 最新天堂网| 丁香婷婷六月天 | 男人的网址 | 亚洲欧美圣爱天天综合 | 嘿嘿嘿视频在线观看 | 在线观看一级片 | 一区视频在线播放 | 四虎影视国产精品 | 欧美天天性 | 欧美三页| 国产午夜小视频 | 不卡视频一区二区 | 国产精品久久精品牛牛影视 | 免费看一级特黄a大片 | 1024你懂的国产日韩欧美 | 成年视频xxxxx免费播放软件 | 特黄特黄一级高清免费大片 | 性欧美高清强烈性视频 |