在使用 Excel時,常常需要在已有數(shù)值的單元格中再增加或減去另一個數(shù)。一般是在計(jì)算器中計(jì)算后再覆蓋原有的數(shù)據(jù)。這樣操作起來很不方便。這里有一個小技巧,大家不妨一試。
  1.創(chuàng)建一個宏:
  選擇Excel選單下的“工具→宏→錄制新宏”選項(xiàng);
  宏名為:MyMicro;
  快捷鍵為:Ctrl+Shift+J(只要不和 Excel本身的快捷鍵重名就行);
  保存在:個人宏工作簿(可以在所有 Excel 工作簿中使用)。
  2.用鼠標(biāo)選擇“停止錄入”工具欄中的方塊,停止錄入宏。
  3.選擇Excel選單下的“工具→宏→Visual Basic 編輯器”選項(xiàng)。
  4.在“Visual Basic 編輯器”左上角的VBAProject中用鼠標(biāo)雙擊VBAProject (Personal.xls) 打開“模塊→Module1”。
  注意:你的模塊可能不是Module1 ,也許是Module2、Module3。
  5.在右側(cè)的代碼窗口中將Personal.xls-Module1(Code)中的代碼更改為:
  Sub MyMicro( )
  OldValue = Val (ActiveCell.Value )
  InputValue = InputBox ( “輸入數(shù)值,負(fù)數(shù)前輸入減號”,“小小計(jì)算器”)
  ActiveCell.Value = Val (OldValue + InputValue)
  End Sub
  6.關(guān)閉Visual Basic編輯器。
  編輯完畢,你可以試試剛剛編輯的宏,按下Shift+Ctrl+J鍵,輸入數(shù)值并按下“確定”鍵。