巨集指令 指定列印張數之語法如何寫

假設 EXCEL表
A1欄位:5(會變動)
使用巨集指令時 語法該如何下
列印時 抓取A1欄位值 讓列印頁數 為1~5(跟隨A1值變動)
謝謝
2012-10-29 14:20 #1
try

ActiveWindow.SelectedSheets.PrintOut Copies:=[a1]

or

ActiveWindow.SelectedSheets.PrintOut Copies:=sheet1.[a1]

vincent12 wrote:
try Active...(恕刪)

感謝回覆 不過
ActiveWindow.SelectedSheets.PrintOut Copies:=1
這指令應該是指列印份數 非列印頁數
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=[D11].Select, Copies:=1
這段語法是設定列印頁數
只是不知語法 如讓from跟to去抓取EXCEL表中特定欄位值
上面這段語法 當EXCEL表中欄位D11=2 去列印時 還是只列印1頁 並不會列印2頁資料
Dim pageset As Integer
pageset = Sheet1.[d11].Value


ActiveWindow.SelectedSheets.PrintOut From:=1, To:=pageset, Copies:=1, Collate:=True

---
[D11].Select是方法...在vba的意義上是選擇d11這個儲存格...
並不是帶出d11這個儲存格的值...
所以你原本這樣寫一定會錯誤...

froce wrote:
Dim pagese...(恕刪)

感謝
就是這個語法
這樣 就可以依照特定欄位值去列印頁數
不需要每次 都要去輸入末頁數
限制級
您即將進入之討論頁 需滿18歲 方可瀏覽。
提醒:內容可能因過於寫實、驚悚而令人感到不舒服,是否繼續觀看?

根據「電腦網路內容分級處理辦法」修正條文第六條第三款規定,已於該限制級網頁,依台灣網站分級推廣基金會規定作標示。
評分
複製連結