返回列表 上一主題 發帖

[發問] 指定列印頁

shootingstar

帖子
63 
主題
34 
精華
0 
積分
103 
點名
0  
作業系統
XP 
軟體版本
office 2007 
閱讀權限
20 
性別
女 
註冊時間
2010-8-5 
最後登錄
2024-10-17 

論壇榮譽勳章論壇贊助勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-6-24 13:33 | 只看該作者

[發問] 指定列印頁

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

TEST.rar (12.59 KB)

收藏 分享

luhpro

帖子
835 
主題
6 
精華
0 
積分
915 
點名
16  
作業系統
Win 10,7 
軟體版本
2019,2013,2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-3 
最後登錄
2024-11-14 
2#
發表於 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
複製代碼

TOP

        靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言，就如鑽石般珍貴；但對愚人來說，卻像是一把泥土，一點價值也沒有。
返回列表 上一主題