VBA InStr with multiple Strings

Question

I want to check multiple strings with InStr and replace them if necessary.

Something like:

s1 = "ABC"  s2 = "ABCD" s3 = "ABCDE"

If InStr(s1,"D") <> 0 Then
   s1 = ""
End If
If InStr(s2,"D") <> 0 Then
   s2 = ""
End If
If InStr(s3,"D") <> 0 Then
   s3 = ""
End If

I'm sure there is a easier and more intuitive way to do this but i just dont know how.
Maybe with Loop or Case ?

Thanks in Advance

since you are repeating the same code multiple times consider writing a function and calling that. — Kevin
– Kevin, Commented Oct 30, 2017 at 17:30

user8753746 · Accepted Answer · 2017-10-30 17:19:45Z

1

Using Case is a solution.

Array is another solution. You can populate your values to an array and do a For Loop for each value in the array.

Answer to similar question:

InStr array is in string

answered Oct 30, 2017 at 17:19

user8753746

Sign up to request clarification or add additional context in comments.

1 Comment

Excel Hero Over a year ago

Your similar question is foo bar. This is a VBA question, not a VB.NET question.

Collectives™ on Stack Overflow

VBA InStr with multiple Strings

1 Answer 1

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related