Office) (CommandBarComboBox.SetFocus 方法

將鍵盤焦點移至指定之 CommandBarComboBox 控制項。 如果控制項停用或不可見，這個方法會失敗。

注意事項

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

語法

運算式。SetFocus

表達 代表 CommandBarComboBox 物件的 變數。

範例

此範例會建立名為 Custom 的命令列，並在其中新增 ComboBox 控制項和 按鈕 控制項。 範例然後使用 SetFocus 方法將焦點設定到 ComboBox控制項。

Set focusBar = CommandBars.Add(Name:="Custom") 
With CommandBars("Custom") 
    .Visible = True  
    .Position = msoBarTop 
End With 
 
Set testComboBox = CommandBars("Custom").Controls _ 
    .Add(Type:=msoControlComboBox, ID:=1) 
With testComboBox 
    .AddItem "First Item", 1 
    .AddItem "Second Item", 2 
End With 
Set testButton = CommandBars("Custom").Controls _ 
    .Add(Type:=msoControlButton) 
testButton.FaceId = 17 
' Set the focus to the combo box. 
testComboBox.SetFocus

另請參閱

• CommandBarComboBox 物件成員

支援和意見反應

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