CommandBar.ShowPopup メソッド (Office)

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

注:

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

構文

式。ShowPopup(x, y)

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

パラメーター

名前 必須 / オプション データ型 説明
x 省略可能 バリアント型 (Variant) ショートカット メニューの位置が基になる x 座標。 この引数を省略した場合は、ポインターの現在の x 座標が使用されます。
y 省略可能 バリアント型 (Variant) ショートカット メニューの位置が基になる 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 のサポートおよびフィードバックを参照してください。

  • Last updated on