1 頁 (共 1 頁)

請問有會使用EXCEL巨集的前輩嗎

文章發表於 : 2019 9月 23 (週一) 8:07 pm
#0 由 Wish791010
現在正在使用一個EXCEL 巨集
是列印日報表 可是每次輸入天數 1-44天 列印出來後 都要重新再排列一次 最後一天 都在第一頁
有高手前輩 可以教我 怎麼把天數 顛倒過來嗎 讓列印完成後第一天 是在上面的

感謝各位前輩

Sub PRT_BOOK1()

i = InputBox("輸入起始天數", "輸入起始天數")
j = InputBox("輸入結束天數", "輸入結束天數")

N = ThisWorkbook.Name

For DD = i To j

Workbooks(N).Activate
Sheets("計算式").Select
Range("K1").Select
ActiveCell.FormulaR1C1 = DD


Sheets("日報表").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("計算式").Select
Range("K1").Select

Next


End Sub