Excel VBA でセルを連続して参照することができます。
準備
1. フォーム (Form1) にコマンドボタン (CommandButton1) を配置します。
サンプルコード
1. コードを記述します。
Private Sub CommandButton1_Click() For iRow = 0 To 50 Sheets("Sheet1").Range("A1").Offset(iRow, 0).Value = iRow Next End Sub
説明
A1 セルから下方向に数字を設定します。