Excelでの印刷に関して

質問

EXCEL VBAのご質問させていただきます。
このサイトは、いつも拝見させていただき、学習させていただいています。

シート１枚で売上リストを構成し、ボタンを押すと、ある日付の表を印刷するようにしております。
印刷のテンプレートは異なるシートで作っていて、そちらにコピー貼り付けで表示されるようにしております。
印刷の方は２５行に売上データが入るようにしておりますが、例えばある日の売上が３０行あると２ページにわたって
印刷されるようにしています。
そこで、１枚目には２５行までの小計、２枚目には残り５行の小計と、２ページすべての合計を表示したいと思っています。
また、１ページと２ページにわたった売上の通し番号も左端に表示できるようにしたいです。
ボタンを押して、以上のことが実現できるコードを書くにはどうすれば良いでしょうか？

回答No.1

imogasi

>コードを書くにはどうすれば良いでしょうか
コードを書いてくださいと言う風になっていて、丸投げです。このコーナーの規約違反。
ーー
言っていることは何にも技術的に難しくないのに、書いてくれとは。
もっと失敗も含めて、やってみて、どこがうまく行かないか絞らないと。
Sheet2の見出しや罫線、書式は別にして（第１－４行に収まるとして）、明細２５行は第５行から第３０行までのように決める。
ただし２５行＋合計１行。
データを第５行から順にセットして、カウンタを＋１するか
３０行を超えたら、
第２ページの見出しで必要な５行（例えば）を飛ばした
３６－５９行を２ページ目明細行として第３６行から順次データをセットしていけばよい。
連番も、１行データをセットするごとに＋１増やして番号列にセットする。
合計も各行の計数をつど足しこんでゆく。
ーー
抜き出した（この辺は質問ではっきりしないが）データが終われば、合計をセットすればよい。すぐ下行か、最終行のすぐ下か、または明細第２６行目にセットする（これも質問に書いてない）。
その印刷シートの印刷は２５行を超えておれば
Range("A1:H30).Printout
超えておれば、続けて
Range("A31:H55）.Printout
を書く。
A１．H３０，Å３１，H５５などは質問者が計算してください。どうせ本件では固定になるから何も難しくない。
後はデータ部分をクリアしておき、次の回の作業に備える。
次の回の繰り返し処理が有るのかどうかも質問でははっきりしない。
ーー
プログラムを書くのに必要な、シート、行、列の実例が書いてなくて
質問しているということ。

お礼

ご指摘の内容、ありがとうございます。
こちら、言葉足らず、そしてサンプル内容も書かないで、回答していただける方へ、不親切であったと感じます。
コードの書き方と書いたのがだめでした。工夫のヒントが欲しかったもので、そのように書けばよかったです。
次回からは、ちゃんと分かってもらえるように書かせていただきます。
叱咤していただき、感謝いたします。