Найти слово на ВЭБ странице

[Ципихович Эндрю]

Подскажите, открыв Интернет Эксплоер из файла, можно ли при помощи ВБА и как организовать поиск слова на странице и выделить его, или курсор чтобы находился у него, открываю файл по скрипту:

Код: Выделить всё

Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate "D:\Рабочая папка\УПК РФ.mht" 'открывает указанный согласно адреса .... и имени ... файл
Sleep 1000 'задержка, то есть пауза выражается в миллисекундах, 1000 миллисекунд это 1 секунда
Do While IE.ReadyState <> 4
Loop
DoEvents
IE.Visible = True
IE.Document.Title = "УПК РФ"
apiShowWindow IE.hwnd, SW_MAXIMIZE
Set IE = Nothing


Сразу оговорюсь, жто нижеследующий вариант открытия файла:

Код: Выделить всё

Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE " + "D:\Рабочая папка\УПК РФ.mht", vbNormalFocus


меня не устраивает, потому, что при таком открытии в заголовке страницы появляется что угодно, можно ли заголовок страницы при таком варианте открытия файла изменить, а также можно ли фокус Normal изменить на Maximize???? У меня не получилось.

[Ципихович Эндрю]

'вариант
'перед сохранением ВЭБ страницы можно менять и название сохраняемого файла и заголовок ВЭБ страницы

Код: Выделить всё

Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE " + "D:\Рабочая папка\УК РФ.mht", vbMaximizedFocus


осталось узнать как найти слово на странице, подскажете???