英語で読む

次の方法で共有


DropDown オブジェクト (Word)

フォームの項目の一覧を含むドロップダウン フォーム フィールドを表します。

注釈

1 つの FormField オブジェクトを返すには、FormFields (index) を使用します。index は、ドロップダウン フォーム フィールドに関連付けられたインデックス番号またはブックマーク名です。 FormField オブジェクトと共に DropDown プロパティを使用して、DropDown オブジェクトを取得します。 次の使用例は、作業中の文書で、ドロップダウン フォーム フィールドの最初の項目である "DropDown" を選択します。

ActiveDocument.FormFields("DropDown1").DropDown.Value = 1

インデックス番号は、 FormFields コレクション内のフォーム フィールドの位置を表します。 次の使用例は、作業中の文書で最初のフォーム フィールドの種類を調べます。 ドロップダウン フォーム フィールドである場合、2 番目の項目が選択されます。

If ActiveDocument.FormFields(1).Type = wdFieldFormDropDown Then 
 ActiveDocument.FormFields(1).DropDown.Value = 2 
End If

次の使用例は、項目を追加する前に、ffield によって表されるフォーム フィールドが有効なドロップダウン フォーム フィールドであるかどうかを調べます。

Set ffield = ActiveDocument.FormFields(1).DropDown 
If ffield.Valid = True Then 
 ffield.ListEntries.Add Name:="Hello" 
Else 
 MsgBox "First field is not a drop down" 
End If

追加 の使用 ドロップダウン フォーム フィールドを追加するのには、 FormFields コレクションを使用してメソッドです。 次の例では、作業中の文書の先頭にドロップダウン フォーム フィールドを追加し、フォーム フィールドに項目を追加します。

Set ffield = ActiveDocument.FormFields.Add( _ 
 Range:=ActiveDocument.Range(Start:=0, End:=0), _ 
 Type:=wdFieldFormDropDown) 
With ffield 
 .Name = "Colors" 
 With .DropDown.ListEntries 
 .Add Name:="Blue" 
 .Add Name:="Green" 
 .Add Name:="Red" 
 End With 
End With

プロパティ

関連項目

Word オブジェクト モデル リファレンス

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。