您现在的位置：星云电脑教程 >> 电脑教程 >> 办公软件 >> OFFICE >> Excel >> 正文

Excel中累加小技巧

星云电脑教程文章来源：本站原创作者：丰锐更新时间：2004-8-10 11:32:55 点击数【有问必答】

　　在使用 Excel时，常常需要在已有数值的单元格中再增加或减去另一个数。一般是在计算器中计算后再覆盖原有的数据。这样操作起来很不方便。
　
　　这里有一个小技巧，大家不妨一试。
　
　　1.创建一个宏：
　
　　选择Excel选单下的“工具→宏→录制新宏”选项；
　
　　宏名为：MyMicro；
　
　　快捷键为: Ctrl＋Shift＋J(只要不和 Excel本身的快捷键重名就行)；
　
　　保存在: 个人宏工作簿(可以在所有 Excel 工作簿中使用)。
　
　　2.用鼠标选择“停止录入”工具栏中的方块，停止录入宏。
　
　　3.选择Excel选单下的“工具→宏→Visual Basic 编辑器”选项。
　
　　4.在“Visual Basic 编辑器”左上角的VBAProject中用鼠标双击VBAProject (Personal.xls) 打开“模块→Module1”。
　
　　注意：你的模块可能不是Module1 ,也许是Module2、Module3。
　
　　5.在右侧的代码窗口中将Personal.xls－Module1(Code)中的代码更改为：
　
　　Sub MyMicro( )
　
　　　　OldValue = Val (ActiveCell.Value )
　
　　　　InputValue = InputBox ( “输入数值，负数前输入减号”,“小小计算器”)
　
　　　　ActiveCell.Value = Val (OldValue ＋ InputValue)
　
　　End Sub
　
　　6.关闭Visual Basic编辑器。
　
　　编辑完毕，你可以试试刚刚编辑的宏，按下Shift＋Ctrl＋J键，输入数值并按下“确定”键。
　
　　这段代码只提供了加减运算，借以抛砖引玉。

【打印此文】【有问必答】【关闭窗口】