Excel VBA如果單元格中的公式值小於零，則msgbox

Question

當用公式更新的單元格中的值小於零時，我試圖獲取msgbox。

例如：

A1 = 5

B5 = A1

如果B5是小於0，則MSGBOX 「你的值小於零」

希望有人能幫助我

謝謝！

Answer 1

包含在工作表的代碼區下面事件宏：

Private Sub Worksheet_Calculate() 
    If [B5] < 0 Then 
     MsgBox "your value is less than zero" 
    End If 
End Sub 

因爲它是工作表的代碼，這是非常容易安裝和自動使用：

1. 右擊Excel窗口底部附近的標籤名稱
2. 選擇查看代碼 - 這將彈出一個VBE窗口
3. 粘貼東西進入並關閉VBE窗口

如果您有任何疑慮，請先在試用工作表上嘗試。

如果保存工作簿，宏將與其一起保存。 如果您正在使用一個版本的Excel更高然後2003，你必須保存 該文件作爲.XLSM而非的.xlsx

要刪除宏：

1. 彈出窗口VBE如上
2. 清晰的代碼進行
3. 關閉VBE窗口

要了解更多關於一般的宏，請參閱：

http://www.mvps.org/dmcritchie/excel/getstarted.htm

和

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

要了解更多有關事件宏（工作表的代碼），請參閱：

http://www.mvps.org/dmcritchie/excel/event.htm

宏必須爲此工作啓用！