Prompt when Cell Changes to 0
Maybe using worksheet_calculate would be better than _change.
Dolphinv4 wrote:
Hi,
I have 3 sheets whereby sheet 1 is linked to sheets 2 & 3. If I type some
things in sheets 2 & 3, cell C36 in sheet 1 may or may not change. If it
changes to more than 0, I want a message box to prompt me.
I setup the vba code as below BUT it only works if the changes are done in
sheet 1, ie, if i change some things in sheets 2 & 3 and C35 in sheet 1
changes, there is no prompt but if I change some things in sheet 1 such that
C36 changes, THEN i get the prompt. How can I change the code to do what I
want in paragraph 1 above?
Thanks!
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Change As Variant
Change = Range("C36").Value
If Change 0 Then
MsgBox "Error"
End If
End Sub
--
Dave Peterson
|