To the best of my knowledge it can't be done as you would expect.
Another user and I where discussing using OR in a find text problem.  The
discussion turned to a very real human situation where the house is locked
and the car is locked.  A known spare house key is in the car and a known
spare car hey is in the house.  There are other keys somewhere to be found.
Obviously the problem is resolved and the search can end when either a house
or car key is found.

Sub HelmutsDilemma()
Dim aWord As Range
Dim myStr As String
For Each aWord In ActiveDocument.Range.Words
 myStr = aWord
 If InStrRev(myStr, " ") = Len(myStr) Then
   myStr = Left(myStr, (Len(myStr) - 1))
 End If
 Select Case myStr
   Case Is = "car", "house"
     If aWord.Next(Unit:=wdWord, Count:=1) = "keys " Or _
       aWord.Next(Unit:=wdWord, Count:=1) = "keys" Then
       With aWord
         .MoveEnd Unit:=wdWord, Count:=1
         .Select
       End With
       Exit Sub
     End If
   Case Else
     'Do Nothing
 End Select
Next
End Sub

Hi N.N.,

http://groups.google.de/group/microsoft.public.word.vba.general/browse_frm/threa
d/c27b7d80e0a74811/48362c7e17c2373a?lnk=st&q=carkey+group%3Amicrosoft.public.wor
d.vba*+author%3AHelmuT+author%3AWeber&rnum=1&hl=de#48362c7e17c2373a