P/S
....слово (текст) может быть последним в строке (т.е. подстановка пробела (RF= "СЛОВА" & " " ) не сработает.. Как вариант ещё одного примера для поиска: найти 9.10.1 ищет 9.10.10

....вот поподробнее, с примером:
в столбце А есть данные такого типа:
1 диск 99.10.1
2 диск 9.10.10
3 диск 9.10.1
нужно найти (например): 9.10.1 (здесь под №3)

Использую Find (наверное придётся использовать обработку поиска, раз нет специальных символов отсечь лишнее):

RF="9.10.1"
With Worksheets(1).Range("a1:a500")
    Set c = .Find(RF, lookin:=xlValues, LookAt:=xlPart)
    If Not c Is Nothing Then
       firstAddress = c.Address
       Do
           '------ОБРАБОТКА НАЙДЕННОГО если успех GoTo DoneFinding---------------

           '-----------------------------------------
           Set c = .FindNext©
       If c is Nothing Then
           GoTo DoneFinding
       End If
           '------ОБРАБОТКА НАЙДЕННОГО если успех GoTo DoneFinding---------------

           '-----------------------------------------        
       Loop While c.Address <> firstAddress
     End If
     DoneFinding:
End With