Msgbox if cell contains text

[Dobbo]

If cell F3 contains text I want a message box run, I can do this with a number but having problems if cell contains text.

 

[Audiojoe]

Try:

If worksheets("sheetname").range("f3").value = "text" then
msgbox...

Audiojoe

 

[Dobbo]

Not quite what I meant, cell F3 could contain any text not "text" the word. Basically if cell F3 contains any word I want a message box to run.

 

[Audiojoe]

Here you go:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)

If Worksheets("sheet1").Range("f3").Value = "" Then
Exit Sub
Else
MsgBox ("An entry has been made")
End If

End Sub

Audiojoe
This message was edited by Audiojoe on 2002-04-24 02:42

 

[Dobbo]

Many Thanks sorted out the problem now. I had the extra problem that F3 cell was merged with G3 & H3 so I had to call the range as well.

Works perfectly now Thank you