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) 坐标会导致弹出菜单的全部或部分显示在可见屏幕边缘之外时,弹出菜单将移动到可查看区域。
示例
本示例可实现的功能为:创建一个包含两个控件的快捷菜单。 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。