Excel2007 RibbonX使用圖文說明教程

在制作自己的選項(xiàng)卡中，我們可以利用Office 2007 Custom UI Editor工具來幫助我們完成工作。但，如果您沒有此工具，別擔(dān)心，我們還可以利用WinRAR軟件來達(dá)到我們的目的。
雖然，Excel2007自帶的Excel 2007 開發(fā)人員參考幫助中也有介紹到此方法，卻不是在Excel里可以直接應(yīng)用的，且不夠詳盡，在此，我將制作過程拆解，一一為您奉上。

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代碼執(zhí)行名InsertCompanyName，必須與將要建立的RibbonSample.xlsm中的回調(diào)過程名一致。）

另存擴(kuò)展名為XML的customUI.xml文件（注意：必須是此文件名）。
新建一customUI文件夾，將此文件放入customUI文件夾里（注意：必須是此文件夾名）。

Step2：
新建一xlsm（啟用宏）文件，命名為“RibbonSample.xlsm”
插入一標(biāo)準(zhǔn)模塊，寫入下列代碼：（如圖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）

關(guān)閉并保存此工作簿。


Step3：
將RibbonSample.xlsm 重命名為 RibbonSample.xlsm.zip 文件。
雙擊此zip文件（無需關(guān)閉zip文件），我們會(huì)看到zip容器中包含一名為_rels的文件夾（如圖2所示），將此文件夾解壓縮到桌面上。

（圖2）

以記事本打開方式，打開桌面上_rels文件夾中的.rels XML文件。
內(nèi)容如下：

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<Relationships xmlns="http://schemas.openxmlformats.org/package/2006/relationships"><Relationship Id="rId3" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/extended-properties" Target="docProps/app.xml"/><Relationship Id="rId2" Type="http://schemas.openxmlformats.org/package/2006/relationships/metadata/core-properties" Target="docProps/core.xml"/><Relationship Id="rId1" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/officeDocument" Target="xl/workbook.xml"/></Relationships>


為了和此前建立的customUI.xml文件建立聯(lián)系，將如下XML語句，

<Relationship Id="someID" Type="http://schemas.microsoft.com/office/2006/relationships/ui/extensibility" Target="customUI/customUI.xml" /> 

（注意，ID可以是任意的，但不能重復(fù)。Target就是先前我們建立的customUI文件夾和文件。）

插入到</Relationships>之前：

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<Relationships xmlns="http://schemas.openxmlformats.org/package/2006/relationships"><Relationship Id="rId3" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/extended-properties" Target="docProps/app.xml"/><Relationship Id="rId2" Type="http://schemas.openxmlformats.org/package/2006/relationships/metadata/core-properties" Target="docProps/core.xml"/><Relationship Id="rId1" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/officeDocument" Target="xl/workbook.xml"/>
<Relationship Id="someID" Type="http://schemas.microsoft.com/office/2006/relationships/ui/extensibility" Target="customUI/customUI.xml" /> 
</Relationships>

退出并保存此XML文件。

將此_rels文件夾（包含剛修改的.rels文件）替換zip文件容器中的_rels文件夾。

Step4：

將前面已經(jīng)準(zhǔn)備好的customUI文件夾，放入此zip容器（如圖3所示）。

（圖3）

關(guān)閉zip文件，將其改名為原來的RibbonSample.xlsm文件名。


Step5：

雙擊打開RibbonSample.xlsm文件，啟用宏，我們將在功能區(qū)（RibbonX）用戶界面中看到一個(gè)My Tab的自定義選項(xiàng)卡（如圖4所示）。

單擊該選項(xiàng)卡，我們會(huì)看到一個(gè)帶有按鈕控件的Company Name的組。

單擊Inset Company Name按鈕，可在選定的單元格中插入Microsoft Corporation字樣。

（圖4）

到此，我們的自定義選項(xiàng)卡就已經(jīng)大功告成。