タイトル : セール番号について 投稿日 : 2013/07/20(Sat) 16:31 投稿者 : GC
いつもお世話になっています VBからエクセルの表に罫線を引き・印刷設定をし印刷する というサンプルを参考にして、やっています。 例 < Dim xlRange As Excel.Range <Set xlRange = xlSheet.Range("A1:F6") < '表に罫線を引く 指定範囲に格子の罫線を引く < xlRange.Borders.LineStyle = xlContinuous '実線 その中で、xlSheet.Range("A1:F6")という設定ですが 一ページの場合はいいですが、 2〜3ベージを印刷する場合、 例 xlSheet.Range("A60:F60") //第2ページ目 xlSheet.Range("A120:F120") //第3ページ目 … 何十ページを印刷する場合、最大印刷ページ数まで、設定すること なんかいい方法があるのでしょうか。 "A1:F6"=>変数になる 例 ij="A1" ik="F6" というふうにできないでしょうか(エラーになる) よろしくお願いします。 環境:VB6+XP |