Re: [算表] VBA if的問題

看板Office作者 (宅男)時間14年前 (2012/02/08 08:06), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串2/2 (看更多)
※ 引述《lgtenos (我真是猜不透你阿)》之銘言: : 軟體:Excel : 版本:2010 : With ActiveSheet.PageSetup : .PrintArea = "C1:P" & spGetData.getRow -1 : TotPages = ActiveSheet.PageSetup.Pages.Count : LeftFooter = .LeftFooter : CenterFooter = .CenterFooter : .LeftFooter = "" : .CenterFooter = "" IF TotPages >1 then : ActiveWindow.SelectedSheets.PrintOut From:=1, To:=TotPages - 1, : copies:=1 End If : .LeftFooter = LeftFooter : .CenterFooter = CenterFooter : ActiveWindow.SelectedSheets.PrintOut From:=TotPages, : To:=TotPages, copies:=1 : End With : 上面是VBA的程式碼 : 因為列印資料的部分最後一頁的頁尾與前面頁次的頁尾不同 : 所以會分兩次列印 : 當頁數在2以上的時候都沒問題 : 可是只有1頁的時候 : 就會產生錯誤 : 請問要如何修正呢 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 175.180.135.78
文章代碼(AID): #1FCRoTxq (Office)
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
文章代碼(AID): #1FCRoTxq (Office)