この記事で使用した単純なプログラムでは、コードを 1 行ずつ、上から下へ順番に実行しました。プログラミングの真価は、1 つ以上の条件を指定して、どのコード行を実行するかをその条件に基づいて決定できることにあります。同じ操作を多くの回数繰り返すことができる場合は、この機能をさらに拡張できます。以下の例は、Macro1 を拡張します。
Sub Macro1()
If Worksheets(1).Range("A1").Value = "Yes!" Then
Dim i As Integer
For i = 2 To 10
Worksheets(1).Range("A" & i).Value = "OK! " & i
Next i
Else
MsgBox "Put Yes! in cell A1"
End If
End Sub
このコードを Visual Basic Editor に入力するか貼り付けて、実行します。表示されるメッセージ ボックスの指示に従い、セル A1 のテキストを変更し、コードを再実行してループの効果を確かめてください。このコード スニペットは、変数、分岐、およびループの働きを具体的に示します。実際の動作を確かめた後でコードを読み解いて、各行の実行でどのような処理が行われるのかを確認してください。
Microsoft Learn: Office VBA の概要
この記事の更新履歴
この記事は、生成AIを活用した自動レビュー・更新フローにより内容を見直し、必要な修正を反映しています。
2026年9月12日
- 削除本文中に露出していた翻訳メタデータ「★上のセグメントで翻訳済み★」を削除しました。
- 変更リンク切れを防止するためMicrosoft Learnの公式ドキュメントURLを現行のURLに更新しました。
