共用方式為


Office) (CommandBarComboBox.List 屬性

取得或設定 CommandBarComboBox 控制項中的項目。 讀取/寫入。

注意事項

[!注意事項] CommandBars 用於部分的 Microsoft Office 應用程式已經由 Microsoft Office Fluent 使用者介面的新功能區元件取代。 如需詳細資訊,請參閱 Office Fluent 功能區概觀

語法

運算式列出索引 ()

表達 代表 CommandBarComboBox 物件的 變數。

參數

名稱 必要/選用 資料類型 描述
Index 必要 Integer 要設定的清單項目。

註解

該屬性對內建的下拉式方塊控制項是唯讀的。

範例

本範例會檢查下拉式方塊控制項中標題為 [自訂] 命令列上 [庫存資料] 的第四個清單專案。 如果此項目不是 View News,則會顯示一則訊息,告知使用者此下拉式方塊可能已經毀壞,並且詢問使用者是否要重新安裝應用程式。

Set myBar = CommandBars _ 
    .Add(Name:="Custom", Position:=msoBarTop, _ 
    Temporary:=True) 
With myBar 
    .Controls.Add Type:=msoControlComboBox, ID:=1 
    .Visible = True  
End With 
With CommandBars("Custom").Controls(1) 
    .AddItem "Get Stock Quote", 1 
    .AddItem "View Chart", 2 
    .AddItem "View Fundamentals", 3 
    .AddItem "View News", 4 
    .Caption = "Stock Data" 
    .DescriptionText = "View Data For Stock" 
End With 
If CommandBars("Custom").Controls(1).List(4) _ 
     > "View News" Then 
MsgBox ("Stock Data appears to be damaged." & _ 
     " Please reinstall application.") 
End If

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應