加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

excel2007中自定义增加工具选项栏和加载宏

(2012-08-01 23:50:07)
标签:

杂谈

一、新建加载宏文件

由于使用了VBA,首先必需将Excel的宏安全性设置为“启用所有宏”。

打开Excel 2007,新建一个Excel文件,将文件另存为“其它格式”,保存类型选“Excel加载宏(*.xlam)类型”,文件名为“加载宏test.xlam”,并修改保存位置到桌面。加载宏类型的文件可以在Excel启动时自动加载,其功能对所有工作簿都起作用,而不是针对某一个工作簿。为便于以后操作,可以暂时将文件保存在桌面上,然后关闭Excel 2007。 

二、自定义功能区

1.修改customUI.xml文件

在桌面上新建一个文件夹,命名为“customUI”,然后在该文件夹中新建一个文本文件,将文件名改为“customUI.xml”,注意扩展名为“xml”,而不是“txt”。右击该文件,选“编辑”打开(或用记事本打开),输入下列内容:

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">

    <ribbon>

        <tabs>

            <tab id="MyTab" label="测试">

                <group id="zu1" label="测试工具">

                    <button id="anniu1" label="测试" size="normal" onAction="test" imageMso="PrintAreaMenu" />

                    <separator id="MySeparator2" />

                    <button id="anniu4" label="测试1" size="large" onAction="test1" imageMso="FilePrint" />

                </group>

                <group id="customGroup40" label="关于">

                    <button id="customButton40" label="作者信息" size="large" onAction="About_Addins" imageMso="HappyFace" />

                </group>

            </tab>

        </tabs>

    </ribbon>

</customUI>

然后单击菜单“文件→另存为”,在弹出的“另存为”对话框中,将“编码”由“ANSI”改为“Unicode”,

说明:上述代码中“<tab id="MyTab" label="测试">”表示自定义的选项卡名称为“测试”,“<group id="zu1" label="测试工具">”表示控件组的显示名称为“测试工具”,“<button id="anniu1" label="测试" size="normal" onAction="OddPagePrint" imageMso="PrintAreaMenu" /> ”行定义了一个按钮,名称为“测试”,按钮图标为Excel 2007内置图标“PrintAreaMenu”,图标大小为普通大小,单击按钮将调用VBA中的"OddPagePrint"过程。通过上述代码,我们定义了如图一所示的自定义功能区。因为上述代码中含有中文字符,所以必需将编码改为“Unicode”,如果只有英文字符,可以不改编码。

2.修改压缩包文件

Office 2007新的文件格式采用了基于XML的文件格式,新的Office Open XML格式的核心使用一些XML的引用架构和一个ZIP容器,其实就是一个ZIP压缩包。所以我们可以用压缩软件(如WinRAR)打开它,然后通过添加、修改其中文件的方法实现自定义功能区的目的。上面的customUI文件夹必须放入其中才能起作用,另外还必须修改其中“_rels”文件夹中的“.res”文件进行关联,具体步骤如下:

1.右击“双面打印.xlam”文件,依次选择“打开方式→选择程序”,在“打开方式 ”对话框中选择解压软件,如“WinRAR压缩文件管理器”。WinRAR软件将弹出窗口,显示压缩包内的文件夹和文件,如图三。 

2.将桌面上的customUI文件夹用鼠标左键拖到WinRAR窗口内,在弹出的“压缩文件名和参数”对话框中单击“确定”,如图四,customUI文件夹将被复制到压缩包内。 

3.双击打开压缩包内的“_rels”文件夹,将该文件夹内的“.res”文件用鼠标左键拖到桌面上,右击该文件,选“编辑”打开(或用记事本打开),在最后的“</Relationships>”前加上下列代码:

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

4.保存该文件,再将其拖回到压缩包内,覆盖原来的“.res”文件。

三、添加VBA代码

双击打开“双面打印.xlam”文件,如果上述操作正确无误,Excel 2007功能区中将出现“双面打印”选项卡。单击该选项卡,可以看到各自定义按钮及其图标。按Alt+F11,打开VBA编辑器,选中“VBAProject ("双面打印.xlam"),单击菜单“插入”→“模块”,插入名称为“模块1”的模块,在其中输入VBA代码,为每个按钮提供运行代码:

Sub test(control As IRibbonControl)

    MsgBox "测试"

End Sub

Sub test(control As IRibbonControl)

    MsgBox "测试1"

End Sub

然后单击VBA编辑器的“保存”按钮保存工程。

四、添加到Excel加载项中

如果不是经常进行双面打印,可以在每次打印前打开“Excel2007双面打印工具.xlam”文件,然后进行双面打印即可。

如果需要经常进行双面打印,可以让Excel每次运行时,都自动加载“Excel2007双面打印工具.xlam”文件,使自定义的选项卡总是出现在Excel 2007的功能区中。这必需把上述文件添加到Excel加载项中。步骤如下:

1.单击“Office 按钮”,再单击“Excel 选项”。

2.在“Excel选项”对话框中单击“加载项”。

3.直接单击“转到”,弹出“加载项”窗口。

4.单击“浏览”,查找并选择“加载宏test.xlam”文件,单击“确定”。

 

 

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有