Need help with message box.
 

I want to modify the following code:

If Not IsEmpty(Cells(22, 11)) Then
MsgBox "Old code"
Exit Sub
End If

to this:

If Not IsEmpty(Cells(22, 11) = "QS") Then
MsgBox "New code"
Exit Sub
End If

It has not worked, what should it be.
Appreciate your help.
Pat

Need help with message box.
 

Hi Pat,

Try:

If Cells(1, 1).Value = "QS" Then
MsgBox "New code"
Exit Sub
End If


---
Regards,
Norman



"Pat" wrote in message
...
I want to modify the following code:

If Not IsEmpty(Cells(22, 11)) Then
MsgBox "Old code"
Exit Sub
End If

to this:

If Not IsEmpty(Cells(22, 11) = "QS") Then
MsgBox "New code"
Exit Sub
End If

It has not worked, what should it be.
Appreciate your help.
Pat