mrjrobinson
New Member
- Joined
- Sep 6, 2017
- Messages
- 8
Hi All,
I have created a Pop Up Box when a field contains a phrase, but whenever the cell its looking at is blank I get a "Run-time error '13': Type mismatch.
My code I have used is:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Worksheets("Member Tracker").Range("E3").Value = "Pay As You Go" Then
MsgBox ("Customer has to pay before entry")
End If
End Sub
Im guessing I need to add in something to say do nothing if the cell is blank, but stumped as to what to put. Any help with this is really appreciated.
Many thanks
I have created a Pop Up Box when a field contains a phrase, but whenever the cell its looking at is blank I get a "Run-time error '13': Type mismatch.
My code I have used is:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Worksheets("Member Tracker").Range("E3").Value = "Pay As You Go" Then
MsgBox ("Customer has to pay before entry")
End If
End Sub
Im guessing I need to add in something to say do nothing if the cell is blank, but stumped as to what to put. Any help with this is really appreciated.
Many thanks