Find cells containing multiple values in random order
 

Hello,

I'm using the find function to search for a single cell containing multiple
predefined words. For example all cells containing the letter A and B, using
the following code:

Set X = Selection.Find(what:="A" & "*" & "B")

But this search only finds cells that conatin A and B in that particular
order. Thus a cell containing BA is not found! Is there a way to adapt the
find statement in such a way the order of the words in a cell are no longer
dependent on the search result?

thanks in advance,

Lucas van Rijsewijk
Deurne, The Netherlands

Find cells containing multiple values in random order
 

Sub lucas()
Set X = Selection.Find(what:="A" & "*" & "B")
Set Y = Selection.Find(what:="B" & "*" & "A")
Set X = Union(X, Y)
End Sub

--
Gary''s Student - gsnu200799


"Lucas" wrote:

Hello,

I'm using the find function to search for a single cell containing multiple
predefined words. For example all cells containing the letter A and B, using
the following code:

Set X = Selection.Find(what:="A" & "*" & "B")

But this search only finds cells that conatin A and B in that particular
order. Thus a cell containing BA is not found! Is there a way to adapt the
find statement in such a way the order of the words in a cell are no longer
dependent on the search result?

thanks in advance,

Lucas van Rijsewijk
Deurne, The Netherlands

Find cells containing multiple values in random order
 

Thanks you for your quick solution! Very much appreciated!