次の方法で共有

CommandBarControl.SetFocus メソッド (Office)

  • [アーティクル]

指定した CommandBarControl にキーボード フォーカスを移動します。 目的のコントロールが選択できない場合、または現在の状態では参照できない場合、このメソッドはエラーになります。

注:

[!メモ] 一部の Microsoft Office アプリケーションにおける CommandBars の使用方法が、Microsoft Office Fluent ユーザー インターフェイスの新しいリボン コンポーネントによって置き換えられました。 詳細については、「Office Fluent リボンの概要」を参照してください。

構文

式。Setfocus

式CommandBarControl オブジェクトを表す変数。

注釈

コントロールに焦点を当てるのは微妙です。 このメソッドを使用すると、コントロールに 3 次元の強調表示が表示されます。 方向キーを押すと、キーボード コントロールのみを押してコントロールに到着したかのように、ツール バー内を移動します。

例

次の使用例は、 Custom という名前のコマンド バーを作成し、 ComboBox コントロールと Button コントロールを追加します。 例は、 SetFocus メソッドを使用して コンボ ボックスコントロールにフォーカスを設定します。

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 のサポートおよびフィードバックを参照してください。