title: How can I search for multiple words in one function in VBA in Word?
body: <p>I've got a macro that searches for a word ("January") and converts the space next to it to a protected space. What I'd like to do is search for the other months of the year as well. Is there a way of searching for the other months within the same function, rather than copy and paste my code 11 times, searching for a different month each time?
  Here's my code so far. I'm only interested in changing the search text line, if it's possible, as the rest works fine and I'm not that good at VBA, basically anything else very quickly becomes too confusing lol.</p>
  
  <p>I have another search function that does the same but following any digit ("([0-9])") and that works, I just want to shorten 12 potential search functions into one.</p>
  
  <pre><code>
  Dim sFindText As String
      sFindText = "January "
      Selection.Find.Execute sFindText
      Do Until Selection.Find.Found = False
      Selection.MoveRight Unit:=wdCharacter, Count:=1
      Selection.TypeBackspace
      Selection.TypeText Text:=" "
      Selection.Find.Execute
      Loop
  End Sub
  </code></pre>