Word VBAでドロップダウンリストを作成する方法【初心者向け解説】

Wordでドロップダウンリストを作成したいけれど、難しそうで手が出せない…そんな方に向けて、初心者でもわかりやすく解説します。今回は、VBA（Visual Basic for Applications）を使って、Word文書にドロップダウンリストを追加する方法をご紹介します。

ドロップダウンリストとは？
VBAを使ってドロップダウンリストを作成する手順
よくある質問や疑問
今すぐ解決したい！どうしたらいい？
まとめ

ドロップダウンリストとは？

Wordのイメージ

ドロップダウンリストとは、あらかじめ設定した選択肢から1つを選ぶ形式の入力方法です。例えば、アンケートや申請書などで「部署名」や「役職」などの項目を入力する際に便利です。手入力の手間を省き、入力ミスを減らすことができます。

VBAを使ってドロップダウンリストを作成する手順

VBAを使ってドロップダウンリストを作成するには、以下の手順を踏みます。

開発タブを表示する

まず、Wordのリボンに「開発」タブを表示させます。

「ファイル」タブをクリックし、「オプション」を選択します。
「リボンのユーザー設定」を選択し、右側の「メインタブ」から「開発」にチェックを入れて「OK」をクリックします。

これで、リボンに「開発」タブが表示されます。

ドロップダウンリストを挿入する

次に、ドロップダウンリストを挿入します。

「開発」タブをクリックし、「コンテンツコントロールの挿入」グループから「ドロップダウンリストコンテンツコントロール」を選択します。
カーソルが挿入されるので、リストを追加したい場所をクリックします。

リストの選択肢を追加する

挿入したドロップダウンリストに選択肢を追加します。

挿入したドロップダウンリストを右クリックし、「プロパティ」を選択します。
「コンテンツコントロールのプロパティ」ダイアログボックスが表示されるので、「追加」ボタンをクリックします。
「表示名」に選択肢の名前を入力し、「OK」をクリックします。
必要な数だけ「追加」を繰り返し、リストに項目を追加します。

VBAでリストを操作する

VBAを使って、ドロップダウンリストの選択肢を操作することもできます。例えば、以下のコードでリストに項目を追加できます。

vba

Sub AddItemsToDropDown()

    Dim dd As ContentControl

    Set dd = ActiveDocument.ContentControls(1) ' 1番目のコンテンツコントロールを取得

    With dd.DropdownListEntries

        .Add "選択肢1"

        .Add "選択肢2"

        .Add "選択肢3"

    End With

End Sub

このコードを実行すると、ドロップダウンリストに「選択肢1」「選択肢2」「選択肢3」が追加されます。