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

Question

我正在嘗試使用公式更新的單元格中的值小於零時獲取msgbox。

例如：

a1 = 5

b5 = a1

如果b5小於零，則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窗口

如果您有任何疑問，請先在試用版工作表上嘗試一下。

如果您保存工作簿，則宏將隨其一起保存。 如果您在2003年以后使用Excel版本，則必須將文件另存為.xlsm而不是.xlsx

刪除宏：

1. 如上調出VBE窗口
2. 清除代碼
3. 關閉VBE窗口

要總體上了解有關宏的更多信息，請參見：

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

和

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

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

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

必須啟用宏才能使其正常工作！