如果單元格超過了另一個單元格的消息框

如果一個單元格中的值小於或大於另一個單元格，然後顯示差異，寫入VBA代碼以彈出消息框的最佳方法是什麼？如果單元格超過了另一個單元格的消息框

列N包含總appts（手動輸入）

列R含有總結果（產生式）

如果計算出後在列R中的小區比在N列的單元小於或大於所述消息框會彈出並說總結果小於appts by＃或總結果大於appts by＃。

來源

2012-12-19 user1916592

您已經嘗試什麼？如果您向我們展示您嘗試過的以及您卡住的位置，我們可以更輕鬆地幫助您...查看[常見問題]（http://www.stackoverflow.com/faq） –

我不確定從哪裏開始。我以前沒有創建過任何東西 - 只需彈出框或使用VBA自動刷新即可。 – user1916592

添加下列程序到您所需表單VBA項目（如表Sheet1）

Private Sub Worksheet_Change(ByVal Target As Range) 

    If Target = Range("N1") Or Target = Range("R1") Then 'Only attempt to run the below code if target is a range you care about 

     If Range("R1").Value2 <> Range("N1").Value2 Then 
      MsgBox "Values differ" 
     End If 

    End If 

End Sub

來源

2012-12-19 22:48:18

+1看起來正確....來吧user1916592一些反饋總是禮貌 – whytheq

在要兩個單元比較彼此（而不是細胞的一整列）的假設：

Private Sub Worksheet_Change(ByVal Target As Range) 

    If Range("N1") > Range("R1") Then 
     MsgBox "Oops. Results less than Input by " & Abs(Range("N1") - Range("R1")) 
    End If 

    If Range("N1") < Range("R1") Then 
     MsgBox "Oops. Results greater than Input by " & Abs(Range("N1") - Range("R1")) 
    End If 

End Sub

這應該實現如下：

比較兩個單元彼此每當片昌ES（不管它是否是R1式生成的值，爲N1的手動輸入，或在片材上別的）
確定哪一個更大
彈出一個適當的消息

來源

2016-06-14 15:53:23 NinjaWabbit

如果單元格超過了另一個單元格的消息框

回答

相關問題