エクセルＶＢＡの勉強を始めました。教えてください。

質問

ＶＢＡの勉強中なのですが、とにかくマクロで連続印刷をしたいのです。For～Nextステートメントを使いたいのですが、以下のマクロのＴｏ以下の意味がわかりません。どうしてＴｏ以下が数字になっていないのですか？初心者には全くわかりません（以下は連続印刷時のマクロの一部分です）
　For 伝票カウンタ 1 to _
Application.WorksheetFunction.Count(Worksheets("売掛金合計票").Range("A4:A13))
Range("B2") = 伝票カウンタ
印刷
Next 伝票カウンタ

　またApplication.WorksheetFunction.とは何者ですか??

よろしくお願い致します。

回答No.1

happypoint · ベストアンサー

■「伝票カウンタ」？

For～Nextでは、ループを回すとき、
「今何回目のループなのか」を数えるために、よく変数を使います。

For i = 1 to 100
（ループ処理）
Next i

この例では、ループを１００回まわすのですが、
ループ回数は「i」という変数に格納されます。
今回の質問では変数名が漢字だったので、ピンとこなかったのでしょうね。
（漢字の変数名はあまり感心しませんが。）

■どうしてTo以下が数字になっていないのですか
Toの後に数字を指定すれば、たとえば先ほどの例のように
100回なら100回まわして終了、という処理になります。

しかし、処理の内容によってはループ回数が一定でない、
つまり「実行するときにならないと回数を決められない」という処理もよくあります。

たとえば学級ごとの生徒の人数だけループしたい、
というようなプログラムでは、
すべてのクラスが30人なら30人で決まっていればよいですが、
バラバラな場合がほとんどです。

質問の例では、ループの上限回数を、ワークシート関数で求め、
可変できるような仕組みにしています。

■Application.WorksheetFunction

これは、VBAの中で「ワークシート関数」を使うときに使用する呪文です。
質問の例で言うと、「COUNT関数」を使用するために使っています。

具体的には、A4:A13のセルに入っている数値の個数をCOUNT関数でもとめ、
その個数分、ループを回すというマクロになっています。

お礼

ご丁寧なご回答をありがとうございました。もっと早くお礼を申し上げたかったのですが、何度アクセスしてもサーバ負荷とかという表示が出てきてアクセスできずに困っていました。わかりました。そういうことでしたか。初心者にとっては戸惑っていました。