ContentControlListEntry.MoveDown メソッド (Word)
ドロップダウン リストまたはコンボ ボックス コンテンツ コントロール内の項目を 1 つ下へ移動し、次に続いていた項目よりも後になるようにします。
構文
式。 MoveDown
式ContentControlListEntry オブジェクトを返す式。
例
次の使用例は、最初の項目を下へ移動し、ドロップダウン リストまたはコンボ ボックス コンテンツ コントロールの最後の項目になるようにします。
Dim objCC As ContentControl
Dim objCL As ContentControlListEntry
Dim intCount As Integer
Set objCC = ActiveDocument.ContentControls.Item(3)
If objCC.Type = wdContentControlComboBox Or _
objCC.Type = wdContentControlDropdownList Then
Set objCL = objCC.DropdownListEntries.Item(1)
For intCount = 1 To objCC.DropdownListEntries.Count
objCL.MoveDown
Next
End If
関連項目
ContentControlListEntry オブジェクト
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。