Una possibilità è
codice:
sql = "SELECT * FROM tabella WHERE (("

separati = Split(testo, " ")
x = 0
for each word In separati
word = trim(word)

sql = sql & " campo1 like '%" & word & "%')"
    	  
 
If Not x = UBound(separati) Then sql = sql & " or ("

x = x + 1
  
Next

sql = sql &")"