if part of cell contains specific text

[Zoticos]

Need help how to check active cell on specific content.


my sheet1 data sample:

A1=635ON
A2=343ON
A3=576ON
A4=456OFF
A5=334ON

Need the macro to check the selected cell if cell contains the letters "ON", if yes then clear cell.

Was trying to use something like this:

IF ActiveCell.Value = "ON" Then Selection.ClearContents

But it only works if cell has only "ON" text in it.

Thanks for any help!

 

[VoG]

Try

If ActiveCell.Value Like "*ON" Then ActiveCell.ClearContents

 

[Zoticos]

Thanks Peter, it worked great!

James