Office () 的 CommandBarControl.SetFocus 方法

將鍵盤焦點移至指定的 CommandBarControl。 如果控制項處於停用或不可見的狀態，這個方法就會失敗。

注意事項

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

語法

運算式。SetFocus

表達 代表 CommandBarControl 物件的 變數。

註解

成為焦點的控制項外觀並沒有很大的改變。 使用此方法之後，您會注意到 控制項上有一個立體醒目提示。 您可以按方向鍵在工具列中移動至控制項，就如同按鍵盤按鍵直接選取控制項一樣。

範例

此範例會建立名為 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

另請參閱

• CommandBarControl 物件成員

支援和意見反應

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