共用方式為

CommandBarControl.SetFocus 方法 (Office)

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

注意事項

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

語法

表達。設定焦點

詞 代表 CommandBarControl 物件的變數。

註解

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

範例

此範例會建立名為 Custom 的命令列，並將 ComboBox 控制項和 Button 控制項新增至其中。 範例然後使用 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

另請參閱

支援和意見反應

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

  • Last updated on