虽然Excel有着强大的计算和统计功能,但有时参与计算的数据不需要输入到单元格中,如果先把数据输入,利用Excel计算出结果,再删除无用的数据太麻烦,还是利用系统自带的计算器计算比较好。
第一步:启动Excel 2003,单击菜单工具/宏/Visual Basic命令,右击ThisWorkBook选择插入/模块,插入一个模块,在右边的代码窗口输入以下内容:
sub 计算机器调用()
application.activateMicrosoftApp Index:=0(如果把的0换成1-6,分别表示调用:Word、PPT、邮件客户端、Access、Foxpro、Project)
第二步:将这个默认的工作薄Book1.xls另存为以计算器调用.xla为文件名的加载宏。进入工具/加载宏,打开加载宏窗口并勾选计算器调用加载宏,确定。
第三步:单击菜单“工具/自定义”命令,切换到命令选项卡,选中类别列表下边的宏选项,这时命令列表下边就会出现一个自定义按钮选项,将这个图标拖动到工具栏的任意位置,右击它就会出现一个右键菜单,在其中要进行四项操作:
A、将命名后文本框内容替换为计算器调用。
B、执行更改按钮图像命令,在出现的子菜单中选中计算器图标。
C、执行图像与文本命令。
D、执行指定宏命令,打开指定宏窗口,选中计算器调用宏,最后单击确定。
经过以上步骤,我们就完成了往工具栏添加计算器调用按钮的操作,单击工具栏上的计算器调用按钮,就可以调出系统自带的计算器了。