1、透過《收款單》，來逐步看一下設定表格列印後編碼自動加1。2、同時按下Alt+F11鍵，彈出如圖對話方塊。3、依次點選選單欄，“插入-模組”。4、在模組對話方塊中輸入：Sub PR() ActiveSheet.Printout [D2]=[D2]+1 End Sub其中【D2】為編碼單元格，輸入完畢後，關閉VB對話方塊。5、在對話方塊中，依次選取【自定義】-【開發工具選項卡】-【宏安全性】，將【宏安全性】新增到右欄，點選【確定】。6、會發現工具欄中出現了【宏安全性】圖示。7、雙擊【宏安全性】圖示，彈出【資訊中心】對話方塊，在其中點選【宏設定】，選取“啟用所有宏”，點選確定。8、同時按下Alt+F8二鍵，彈出【宏】對話方塊。9、在【宏】對話方塊中，點選【選項】，彈出【宏選項】介面，在此介面中可以設定熱鍵，設定成“CTRL+P”，點選【確定】，設定完畢。10、按下“CTRL+P”，列印的同時，編碼自動變化+1。
1、透過《收款單》，來逐步看一下設定表格列印後編碼自動加1。2、同時按下Alt+F11鍵，彈出如圖對話方塊。3、依次點選選單欄，“插入-模組”。4、在模組對話方塊中輸入：Sub PR() ActiveSheet.Printout [D2]=[D2]+1 End Sub其中【D2】為編碼單元格，輸入完畢後，關閉VB對話方塊。5、在對話方塊中，依次選取【自定義】-【開發工具選項卡】-【宏安全性】，將【宏安全性】新增到右欄，點選【確定】。6、會發現工具欄中出現了【宏安全性】圖示。7、雙擊【宏安全性】圖示，彈出【資訊中心】對話方塊，在其中點選【宏設定】，選取“啟用所有宏”，點選確定。8、同時按下Alt+F8二鍵，彈出【宏】對話方塊。9、在【宏】對話方塊中，點選【選項】，彈出【宏選項】介面，在此介面中可以設定熱鍵，設定成“CTRL+P”，點選【確定】，設定完畢。10、按下“CTRL+P”，列印的同時，編碼自動變化+1。