標題: [發問] 指定列印頁 [打印本頁]

---

作者: shootingstar    時間: 2011-6-24 13:33     標題: 指定列印頁

自己建立的兩張套印表格：出庫單及出貨單，也參考了其他先進的VBA程式套用在表格裡，希望在每次列印時出庫單的G4蘭會自動新增一個號碼，可是是希望只有在出庫單列印時才有這個動作，可是我將程式放在我自己的EXCEL檔後，卻變成不管是出庫單或出貨單列印，在出庫單的G4欄都會自動新增一個號碼，尋求解答，謝謝。

---

作者: luhpro    時間: 2011-6-25 23:40

本帖最後由 luhpro 於 2011-6-25 23:44 編輯

回復 1# shootingstar
那是因為你的程式並沒有指定列印出庫單時才要新增該號碼,
修改後程式如下 :

1. Private Sub Workbook_BeforePrint(Cancel As Boolean)
   
2.   With ActiveWindow.ActiveSheet
   
3.     If .Name = "出庫單" Then .Range("G4") = .Range("G4") + 1
   
4.   End With
   
5. End Sub

複製代碼

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)