質問: "no." & format(i, "0000") activewindow.selectedsheets.printout copies:=1, collate:=true doevents next i
回答: 別の適当な変数(例えばh)を宣言して、 h = application.inputbox("適当に数入れろー") for i = 1 to h でいいんではないのかなあ。