在Excel中累加的小技巧

在使用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鍵，輸入數值並按下“確定”鍵。