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 支持和反馈,获取有关如何接收支持和提供反馈的指南。