|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
虽然Excel有着强大的计算和统计功能，但有时参与计算的数据不需要输入到单元格中，如果先把数据输入，利用Excel计算出结果，再删除无用的数据太麻烦，还是利用系统自带的计算器计算比较好。如何在Excel的工具栏添加一个命令按钮，实现计算器的一键调用呢？
W' l. A8 V' k: T- k( n! n 第一步：启动Excel 2003（其他版本操作类似），单击菜单“工具→宏→Visual Basic编辑器”命令，右击“ThisWorkBook”，选择“插入→模块”，插入一个模块，在右边的代码窗口输入以下内容：1 f% P7 B5 D. ]0 |5 }3 x! S+ G6 e
Sub 计算器调用()! A( Z9 I# J8 j- o9 a6 O1 k
Application.ActivateMicrosoftApp Index:=0: W0 \0 h1 [1 y- ], u
End Sub
, Q9 g' j& h9 _- B) @! f 第二步：将这个默认的工作薄——“Book1.xls”另存为以“计算器调用.xla”为文件名的加载宏，单击菜单“工具→加载宏”命令，打开“加载宏”窗口并勾选“计算器调用”加载宏（如图1），确定。
" k+ F$ B$ [+ Y( s" Thttp://soft.pcw.com.cn/bangong_excel/h001/h77/img200806051544000.jpg
$ d( h$ n* X. ?4 u, ~- C 第三步：单击菜单“工具→自定义”命令，切换到“命令”选项卡，选中“类别”列表下边的“宏”选项，这时“命令”列表下边就会出现一个“自定义按钮”选项（笑脸图标），将这个图标拖动到工具栏的任意位置，右击工具栏上出现的笑脸图标，就会出现一个右键菜单（如图2），在这个右键菜单中要进行四项操作：
E+ @* _( [, ?http://soft.pcw.com.cn/bangong_excel/h001/h77/img200806051544320.jpg
1 A& r( ]" g* |4 J F A.将“命名”后边文本框内的内容替换为“计算器调用”。( Y" H) \" k& Q- x5 u9 I( x
B.执行“更改按钮图像”命令，在出现的子菜单中选中“计算器”图标。
9 }0 m" A( H3 |+ D1 P C.执行“图像与文本”命令。! B2 B( X7 a6 @, h B6 E
D.执行“指定宏”命令，打开“指定宏”窗口，选中“计算器调用”宏，最后单击“确定”。& {* n2 B: {; K6 C
经过以上步骤，我们就完成了往工具栏添加“计算器调用”按钮的操作，单击工具栏上的“计算器调用”按钮，就可以调出系统自带的计算器了。
8 b3 t# _; D: D0 ^ 小提示：如果将这个功能提供给别人使用时，可在完成第三步时，单击菜单“文件→保存”命令，将默认的工作薄——“Book1.xls”以“计算器调用.xls”为文件名保存到任意位置，在别人的电脑上打开“计算器调用.xls”，在“安全警告”窗口单击“启用宏”按钮，然后执行四个步骤“另存为加载宏→应用加载宏→工具栏添加按钮→指定宏”，就可以使用这个功能了。而不要将第一个步骤改成复制加载宏“计算器调用.xla”到Excel加载宏的默认保存位置（XP系统中为C:\Documents and Settings\当前登录用户名\ApplicationData\Microsoft\AddIns，Vista中的位置在C:\User\用户名\Roaming\Microsoft\AddIns）。 |
|
发表于 2010-3-23 07:47:33