我要回覆

lishen

58分

樓主

lishen

個人積分：58分

文章編號：39451557

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

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

2012-10-29 14:20 #1

文章關鍵字

巨集指令語法列印張數

vincent12

405分

2樓

vincent12

個人積分：405分

文章編號：39532539

try

ActiveWindow.SelectedSheets.PrintOut Copies:=[a1]

or

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

lishen

58分

樓主

lishen

個人積分：58分

文章編號：39654000

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頁資料

froce

77分

4樓

froce

個人積分：77分

文章編號：39687489

Dim pageset As Integer
pageset = Sheet1.[d11].Value

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

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

lishen

58分

樓主

lishen

個人積分：58分

文章編號：39692890

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

感謝
就是這個語法
這樣就可以依照特定欄位值去列印頁數
不需要每次都要去輸入末頁數

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

小惡魔新聞台

今日熱門文章 網友點擊推薦！

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

今日熱門文章　網友點擊推薦！