小編碼字加辛苦做教程,給關注分享收藏下吧!
小編昨天發了一篇管理員工檔案的文章,反響不錯,如果有興趣的朋友,點我的頭像看26日的文章。
員工檔案建好之後,打印也非常方便了,有朋友提出了,這樣確實是非常方便,而且有條理,別人如果用WORD弄,確實節約了一大把時間哦!
但問題來了,如果批量打印,現在小編就介紹下小編會用的方法。
方法很牛叉,學會後,你扛著攝像機,別人都追不上你,不明白嗎?看圖:
準備
小編準備了一張簡短的員工檔案管理表,主要是為了方便演示,昨天的表格太長了,演示不方便。
如果對員工檔案表自動變化不明白的朋友,請查看我26日的文章,小編這裡就不詳細講了。
簡單說明就下:用了VLOOKUP()的公式就行了,然後通過編號一一得到信息。
今天小編主要就是講批量打印的問題,重點來了,跟著小編節奏走吧!
使用簡單的VBA製作批量打印
我使用的表格是2007版的,首先在下表的F3和F4單元格中,輸入打印開始,打印結束的字符。
然後打開:開發工具-插入-命令按鈕(在G5單元格中),當然你可以放在不同的地方。
如果不知道開發工具在哪裡的,請看下圖。
插入命令按鈕如下圖請清楚,不要弄錯了,點擊之後,在自己畫一下,小編我做好的就沒畫了。
然後點擊右鍵,查看代碼,在代碼中輸入如下代碼:
Private Sub CommandButton1_Click()
For i = Range("G3") To Range("G4")
Range("b2") = i
ActiveSheet.PrintOut
Next
End Sub
意思就是讓其從我們設置的G3打印到G4,每循環一次就把這個變化的值賦給B2單元格,一直打下去。看操作,弄好之後,退出設計模式即可,關閉代碼窗口。
然後我們點擊打印,即可實現批量打印了,是不是一個心病又解決了。
如果沒有裝打印機的朋友,可以下載一個打印虛擬機軟件就可以了,能正常打印。
注:這個代碼大家可以記下來,然後套用到別的表格上,都可以實現批量打印,可要學會舉一反三,當然小編也不是什麼大神,也不過是在不斷的學習。
如果有朋友不會的,需要這張表的原件的,直接先關注我之後,右上角有一個發私信,回覆:20170927
頭條會自動把表格地址發給你,方法不會看下圖。