串刺し印刷するための、串刺し処理（串刺し面付）

----- べんりあつめ。-----

ルールがないかを探ってみると、
エクセル上のリストに、何枚目かがわかるように番号を振れればOKのようです。
それは、１、２、３、１、２、３、１、２、３というように順に続きます。これを最終的に、並び替えして、１、１、１、２、２、２、３、３、３と並び替えすればいいわけです。

ただし、やっかいなのが、「余り」ですね。（前ページの黄色背景赤文字部分）
この場合、リスト上では、１、２、３、４、１、２、３、４、１、２、３となり、
並び替えして、１、１、１、２、２、２、３、３、３、４となるわけです。
そんな vba を作る必要があります。

手順的にざっくり考えると、
※ どのサイズが用紙１枚に何枚面付できるかは、vba内の【C】に直接設定
１、サイズが入力されている最終行の取得（繰り返し処理の完了フラグ用）
２、同じサイズの個数を調べる
３、サイズによる１面付の個数取得
４、最大枚数の取得
５、ページ数を入力処理
６、並び替え

A列は関係ないけど、B列にサイズが入っていて、C列に串刺し番号を vba で表示するっていうのが↓