在制作自己的选项卡中,我们可以利用Office 2007 Custom UI Editor工具来帮助我们完成工作。但,如果您没有此工具,别担心,我们还可以利用WinRAR软件来达到我们的目的。
虽然,Excel2007自带的Excel 2007 开发人员参考帮助中也有介绍到此方法,却不是在Excel里可以直接应用的,且不够详尽,在此,我将制作过程拆解,一一为您奉上。
Step1:
建立一文本文件,写入下列XML代码:
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
<ribbon>
<tabs>
<tab id="CustomTab" label="My Tab">
<group id="SampleGroup" label="Company Name">
<button id="Button" label="Insert Company Name" size="large" />
</group >
</tab>
</tabs>
</ribbon>
</customUI>
(注意:Insert Company Name按钮的OnAction代码执行名InsertCompanyName,必须与将要建立的RibbonSample.xlsm中的回调过程名一致。)
另存扩展名为XML的customUI.xml文件(注意:必须是此文件名)。
新建一customUI文件夹,将此文件放入customUI文件夹里(注意:必须是此文件夹名)。
Step2:
新建一xlsm(启用宏)文件,命名为“RibbonSample.xlsm”
插入一标准模块,写入下列代码:(如图1所示)
Sub InsertCompanyName(ByVal control As IRibbonControl)
Dim MyText As String
If TypeName(Selection) <> "Range" Then Exit Sub
MyText = "Microsoft Corporation"
Selection.Value = MyText
End Sub
(图1)
关闭并保存此工作簿。
Step3:
将RibbonSample.xlsm 重命名为 RibbonSample.xlsm.zip 文件。
双击此zip文件(无需关闭zip文件),我们会看到zip容器中包含一名为_rels的文件夹(如图2所示),将此文件夹解压缩到桌面上。
(图2)