Excel VBAコーディング：コードウィンドウの操作

入力したテキスト内の任意の場所にカーソルを置き、F5キーを押して手順を実行します。

F5は、[実行]→[サブ/ユーザーフォームの実行]のショートカットです。コードを正しく入力すると、Excelが手順を実行し、簡単なダイアログボックスに応答できます。ダイアログボックスのテキストは、ここに表示されているテキストとは異なります。

GuessNameプロシージャは、このダイアログボックスを表示します。

手順5にリストされているコードを入力すると、入力したテキストがVBEによって調整されていることに気付く場合があります。たとえば、Subステートメントを入力すると、VBEは自動的にEndSubステートメントを挿入します。また、等号の前後のスペースを省略すると、VBEによってスペースが挿入されます。また、VBEは一部のテキストの色と大文字を変更します。これはすべて完全に正常です。これは、物事をきちんと読みやすくするためのVBEの方法にすぎません。

前の手順に従った場合は、マクロとも呼ばれるVBASubプロシージャを記述しただけです。F5キーを押すと、Excelがコードを実行し、指示に従います。つまり、Excelは各ステートメントを評価し、指示されたとおりに実行します。（この新しく発見された力を頭に浮かばせないでください。）このマクロは何度でも実行できますが、数十回で魅力が失われる傾向があります。

記録のために、この単純なExcelマクロは次の概念を使用します。

• サブプロシージャの定義（最初の行）
• 変数（MsgおよびAns）への値の割り当て
• 文字列の連結（結合）（＆演算子を使用）
• 組み込みのVBA関数（MsgBox）を使用する
• 組み込みのVBA定数（vbYesNo、vbNo、およびvbYes）を使用する
• If-Then構文の使用（2回）
• Ending a Sub procedure (the last line)

Using the Excel VBA macro recorder

Another way you can get code into a VBA module is by recording your actions, using the Excel macro recorder.

By the way, there is absolutely no way you can record the GuessName procedure shown above. You can record only things that you can do directly in Excel. Displaying a message box is not in Excel’s normal repertoire. (It’s a VBA thing.) The macro recorder is useful, but in many cases, you’ll probably need to enter at least some code manually.

Here’s a step-by-step example that shows how to record a macro that inserts a new worksheet and hides all but the first ten rows and all but the first ten columns. If you want to try this example, start with a new, blank Excel workbook and follow these steps:

Activate a worksheet in the workbook.

Any Excel worksheet will do.

Click the Developer tab, and make sure that Use Relative References is not highlighted.

This macro is recorded using Absolute References.

Choose Developer → Code → Record Macro, or click the icon next to the Ready indicator on the left end of the status bar.

Excel displays its Record Macro dialog box.

In the Record Macro dialog box, name the macro TenByTen, specify that you want the macro stored in This Workbook, and press Shift+T for the shortcut key.

The macro can be executed when you press Ctrl+Shift+T.

Click OK to start recording. Excel automatically inserts a new VBA module into the project that corresponds to the active workbook.

From this point on, Excel converts your actions to VBA code. While you’re recording, the icon in the status bar turns into a small square. This is a reminder that the macro recorder is running. You can also click that icon to stop the macro recorder.

Click the New Sheet icon to the right of the last sheet tab.

Excel inserts a new worksheet.

Select the entire Column K (the 11th column) and press Ctrl+Shift+right arrow; then right-click any selected column and choose Hide from the shortcut menu.

Excel hides all of the selected columns.

Select the entire Row 11 and press Ctrl+Shift+down arrow; then right-click any selected row and choose Hide from the shortcut menu.

Excel hides all of the selected columns.

Select cell A1.

Choose Developer → Code → Stop Recording, or click the Stop Recording button on the status bar (the small square). Excel stops recording your actions.

この新しく記録されたマクロを表示するには、Alt + F11を押してVBEをアクティブにします。プロジェクトウィンドウでワークブックの名前を見つけます。プロジェクトに新しいモジュールがリストされていることがわかります。モジュールの名前は、マクロの記録を開始したときにブックに他のモジュールがあったかどうかによって異なります。そうでない場合、モジュールの名前はModule1になります。モジュールをダブルクリックすると、モジュールのコードウィンドウが表示されます。

アクションによって生成されるコードは次のとおりです。

サブTenByTen（）
'
'TenByTenマクロ
'
'キーボードショートカット：Ctrl + Shift + T
'
  Sheets.Add After：= ActiveSheet
  Columns（ "K：K"）。Select
  Range（Selection、Selection.End（xlToRight））。Select
  Selection.EntireColumn.Hidden = True
  Rows（ "11:11"）。Select
  Range（Selection、Selection.End（xlDown））。Select
  Selection.EntireRow.Hidden = True
  Range（ "A1"）。Select
エンドサブ