Как найти текст в выделенном диапазоне?

[Мультипликатор]

Здравствуйте, все!!!
Такая проблемка возникла. Нужно найти текст в выделенном тексте, чтобы поиск происходил только в выделенном, а на остальное внимания не обращал.
Через Selection.Find.Text = не получается он находит в других местах.

И попутный вопрос: как узнать нашел ли с помощью Selection.Find или нет, не выделяя искомое. Т.е. задаю найти "мама" и, если есть такое буквосочетание, то какой параметр это определяет? И если не нашел, то какой параметр это определяет?

[viter.alex]

With Selection.Find
  .Text = "мама" 'Задаём параметры поиска
  .Execute 'Выполняем поиск
  If .Found Then
    MsgBox "Текст найден"
  End If
End With

[Мультипликатор]

Сообщение от viter.alex

With Selection.Find
  .Text = "мама" 'Задаём параметры поиска
  .Execute 'Выполняем поиск
  If .Found Then
    MsgBox "Текст найден"
  End If
End With

К сожалению, такой способ опять ищет не только в выделенном тексте, а везде, во всем документе.

Заключение.Tables(2).Cell(1, 1).Select
        With Selection
            .Find.Text = "  " 'Что ищем
            .Find.Execute 'Выделяем найденное
            If .Find.Found Then
                MsgBox "Имеются двойные пробелы в выделенном тексте"
            Else
                MsgBox "В выделенном тексте пробелов не обнаружено"
            End If
        End With

Перескакивает за пределы выделеного текста.
Что делать?