Excel 2007 RibbonX使用教程

mhfree發表於2016-06-18

製作自己的選項卡中,我們可以利用Office2007Custom 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

Excel2007 RibbonX使用教程 三聯教程

(圖1)

關閉並儲存此工作簿。


Step3:
將RibbonSample.xlsm 重新命名為 RibbonSample.xlsm.zip 檔案。
雙擊此zip檔案(無需關閉zip檔案),我們會看到zip容器中包含一名為_rels的資料夾(如圖2所示),將此資料夾解壓縮到桌面上。

圖2.JPG

(圖2)

以記事本開啟方式,開啟桌面上_rels資料夾中的.rels XML檔案。
內容如下:

<?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檔案建立聯絡,將如下XML語句,

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

(注意,ID可以是任意的,但不能重複。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:

將前面已經準備好的customUI資料夾,放入此zip容器(如圖3所示)。

圖3.JPG

(圖3)

關閉zip檔案,將其改名為原來的RibbonSample.xlsm檔名。


Step5:

雙擊開啟RibbonSample.xlsm檔案,啟用宏,我們將在功能區(RibbonX)使用者介面中看到一個My Tab的自定義選項卡(如圖4所示)。

單擊該選項卡,我們會看到一個帶有按鈕控制元件的Company Name的組。

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

圖4.JPG

(圖4)

到此,我們的自定義選項卡就已經大功告成。

相關文章