CommandBar.ShowPopup メソッド (Office)

  • [アーティクル]

指定したコマンド バーを、指定した座標またはマウス ポインターの現在の座標に、ショートカット メニューとして表示します。

注:

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

構文

式。ShowPopup(x, y)

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

パラメーター

名前 必須 / オプション データ型 説明
x 省略可能 バリアント型 ショートカット メニューの位置の基となる x 座標。 この引数を省略すると、ポインターの現在の x 座標が使用されます。
y 省略可能 バリアント型 ショートカット メニューの位置の基となる y 座標。 この引数を省略すると、ポインターの現在の y 座標が使用されます。

注釈

メニューを左揃えにすると、 ShowPopup メソッドによって表示されるショートカット メニューの左上隅が (x、 y + 1) になります。メニューが右揃えの場合、ショートカット メニューの右上隅が (x + 1、 y + 1) になります。 Windows 関数 GetSystemMetrics(SM_MENUDROPALIGNMENT) を使用して、システム メトリックのドロップダウン メニューの配置を確認します。

(x, y) 座標の画面位置によって、ポップアップ メニューのすべてまたは一部が表示画面の端を越えて表示される場合、ポップアップ メニューは表示可能領域に合わせてシフトします。

例

次の使用例は、2 つのコントロールが含まれるショートカット メニューを作成します。 ショートカット メニューを表示するために ShowPopup メソッドを使用しています。

Set myBar = CommandBars _ 
    .Add(Name:="Custom", Position:=msoBarPopup, Temporary:=False) 
With myBar 
    .Controls.Add Type:=msoControlButton, Id:=3 
    .Controls.Add Type:=msoControlComboBox 
End With 
myBar.ShowPopup

注:

コマンド バーの Position プロパティが msoBarPopup に設定されていないと、エラーが発生するので注意が必要です。

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。