创建常用功能加载宏

创建一个空白加载宏文件，取名为常用功能，保存位置与MyVBA加载宏保持一致，这样MyVBA加载宏的打开宏文件菜单会找到它，并创建子按钮。

创建Ribbon界面：

初始的界面，在开发工具菜单后面增加了一个常用功能菜单，这个菜单下面有一个分组其他，里面有一个按钮关闭，功能就是关闭常用功能这个加载宏。

这种功能性的加载宏文件，设计目标就是在需要使用的时候，通过MyVBA加载宏的打开宏文件菜单打开它，使用结束后，通过关闭按钮关闭它。

Ribbon界面customUI.xml代码：

代码语言：javascript复制

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="RibbonUI_onLoad">
<ribbon>
<tabs>
  <tab id="TabCommon" label="常用功能" insertAfterMso="TabDeveloper">
    <group id="GroupRange" label="单元格">


    </group>

   <group id="GroupOther" label="其他">
    <button id="rbbtnCloseCommon" label="关闭&#13;" size="large" onAction="rbbtnCloseCommon" imageMso="PrintPreviewClose"/>
  
   </group>

</tab>
</tabs>
</ribbon>
</customUI>

打开加载宏文件激活Ribbon界面回调函数：

代码语言：javascript复制

Sub RibbonUI_onLoad(Ribbon As IRibbonUI)
    On Error Resume Next
    Ribbon.ActivateTab "TabCommon"
End Sub

Ribbon界面关闭按钮的回调函数：

代码语言：javascript复制

'关闭加载宏
Sub rbbtnCloseCommon(control As IRibbonControl)
    ThisWorkbook.Close False
End Sub

在这个基础上，后续将陆续增加一些常用的功能。

主要是一些单元格操作、工作表操作等通用性的东西。

vba 编程算法

0 人点赞