case is string contains string?

[salgud]

I have played with it for an hour, but can't figure out how to make a case
statement that would be something like:

Case is = (string1 contains string2)

Is there a way to do this?
Thanks!

 

[Don Guillett]

Look in the vba help index for
INSTR

 

[Gary Keramidas]

simplistic, but may give you an idea, since you didn't provide much.

Sub test()
Select Case True
Case InStr(1, "this is a test", "tst")
Debug.Print "True"
Case Else
Debug.Print "False"
End Select
End Sub

 

[Bob Phillips]

Try

Select Case True

Case string1 Like "*string2*"

etc.
End Select

 

[salgud]

I have played with it for an hour, but can't figure out how to make a case
statement that would be something like:

Case is = (string1 contains string2)

Is there a way to do this?
Thanks!

Thanks to all!

 

[salgud]

Thanks to all!

Gave both methods a try, but neither works! I'm setting a case for
worksheets that have "Monthly" in their sheetname (sWsName)

I put in:

Case sWsName like "Monthly"

and

Case "Monthly" Like sWsName

and

Case instr(1,lcase(sWsName),"monthly")

and

Case InStr(1, sWsName, "Monthly")

Am I missing something?

 

[Bob Phillips]

Not much point us answering if you don't read it

Case sWsName like "*Monthly*"

 

[salgud]

Not much point us answering if you don't read it

Case sWsName like "*Monthly*"

Thanks for your help.