マクロを使って、入力された数で印刷をしたいです。 現在・・・ Sheet1 A列【No.】 B列【日時】 C列【印刷部数】 Sheet2 印刷画面とSheet1のA列の数字を 自:(始まりNo.) 至:(終わりNo.)を入れると自:至のNo.のデータを連続自動印刷するマクロ(下記(1))をつくってあります。 ここに追加で、Sheet1 C列【印刷部数】の枚数ごとにも印刷する、マクロを追加することがかのでしょうか? マクロはあまりわからないので、どなたか教えていただけると助かります。 (1) Sub 印刷開始添乗用意封筒() Dim lStart As Long Dim lEnd As Long Dim lRow As Long lStart = Worksheets("(3)印刷ボタン").Range("I19") lEnd = Worksheets("(3)印刷ボタン").Range("J19") For lRow = lStart To lEnd Worksheets("(3)印刷ボタン").Range("A29") = lRow Worksheets("(3)印刷ボタン").PrintOut Next End Sub
↧