VBA "contains" or "like" statement?

[Captain Smith]

I have searched this board and I know somewhere there must be a post like this already, but I cannot find it.

I just want to write a simple VBA statement to identify if a cell contains a certain string, rather than the entire string being equal or not equal to a value.

Something like:
sub hello()
dim cell as range
For Each cell In Selection
if cell.contains (*pickle*) then msgbox ("I like pickles")
Next
End Sub

I know this is the wrong syntax but what is the right syntax?

Thanks!

 

[Michael M]

Sorry,Didn't realise you wanted contains
try

Sub MM1()
Dim lc As Integer, c As Integer, r As Long
lc = Cells(11, Columns.Count).End(xlToLeft).Column
For c = lc To 1 Step -1
    If Not Cells(11, c) Like "objtype" And Not Cells(11, c) Like "assessment" Then
        Columns(c).EntireColumn.Hidden = True
    End If
Next c
For r = 12 To 150
    If Cells(r, 1) <> 4 Or Cells(r, 2) <> 4 And Cells(r, 2) <> 1 Or Cells(r, 5) <> 4 Or Cells(r, 11) <> 4 Or Cells(r, 15) <> 4 Then
        Rows(r).EntireRow.Hidden = True
    End If
Next r
End Sub

 

[Teeroy]

Michael, I think you're on the wrong thread...

Coffee time mate .

 

[Michael M]

....what an idiot...I had 2 versions of Mr Excel open and answered the wrong one.......
I wondered where the answer to that thread went...

 

[whinnyhams]

I am looking for something similar, but instead of hiding a row, I want to place specific text in the cell adjacent (with multiple else statements). So for example, if A1 is "pickles", B1 should say "Topping", if A2 says "Ketchup", B2 should say "Condiment" and so on...

 

[RoryA]

Welcome to the forum.

It sounds more like you want a lookup formula of some type, rather than code.