中文字幕理论片,69视频免费在线观看,亚洲成人app,国产1级毛片,刘涛最大尺度戏视频,欧美亚洲美女视频,2021韩国美女仙女屋vip视频

看了我們辦公軟件欄目11月6日《巧用Excel函數也能批量打印明信片》(以下簡稱《原文》)的文章(http://soft.yesky.com/office/286/2652286.shtml)，覺得還不夠完美，需要改進。

　　啟動Excel，，按下“Alt+F11”組合鍵進入VBA編輯狀態(tài)，在右邊選中《原文》名稱，執(zhí)行“插入→模塊”命令，插入一個新模塊(模塊1)，然后將下述代碼輸入到模塊1右側的代碼編輯區(qū)中:

　　Sub dy()
　　On Error Resume Next
　　x = inputbox("請輸入打印起始序號:","提示")
　　y = inputbox("請輸入打印結束序號:","提示")
　　For i = x To y
　　Cells(1, 8) = i
　　ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate:=True
　　Next i
　　End Sub

　　輸入完成后，關閉VBA編輯窗口，返回Excel中。

　　將多張明信片裝入打印機中，運行上述宏，在隨后彈出的兩個對話框(如圖1)中，分別輸入要打印的明信片的起始序號和結束序號(如8、18)，按下確定按鈕，序號為8—18號的明信片即刻被打印出來。

　　怎么樣?這下效率高多了吧!

 

本站僅提供存儲服務，所有內容均由用戶發(fā)布，如發(fā)現有害或侵權內容，請點擊舉報。