CommandBarButton.Move 方法 (Office)
将指定的 CommandBarButton 控件移动到现有命令栏。
注意
某些 Microsoft Office 应用程序中对 CommandBars 的使用已由 Microsoft Office Fluent 用户界面的新功能区组件取代。 有关详细信息,请参阅 Office Fluent 功能区概述。
语法
表达式。在) 之前移动 (栏
expression 是必需的。 一个代表 CommandBarButton 对象的变量。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
Bar | 可选 | Variant | 一个代表控件的目标命令栏的 Command 对象。 如果忽略该参数,则控件将移动到当前所在命令栏的末端。 |
Before | 可选 | Variant | 表示控件位置的数字。 控件将插到该位置的控件之前。 如果忽略该参数,控件插入到同一命令栏。 |
示例
本示例将命令栏上名为 Custom 的第一个组合框控件移动到该命令栏上第七个控件之前的位置。 该示例将标记设置为 “选择”框 ,并为控件分配低优先级,以便在所有控件都不适合一行时,它可能会从命令栏中删除。
Set allcontrols = CommandBars("Custom").Controls
For Each ctrl In allControls
If ctrl.Type = msoControlComboBox Then
With ctrl
.Move Before:=7
.Tag = "Selection box"
.Priority = 5
End With
Exit For
End If
Next
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。