В течение некоторого времени Excel “поддерживает работу в Интернете”, что означает, что программа знает, как обрабатывать гиперссылки. Вы можете добавить гиперссылку в документ, щелкнуть по этой ссылке, и Excel откроет ваш веб-браузер и отобразит содержимое этой ссылки в браузере. (Вы также можете создать гиперссылку на другие документы Office, включая книги Excel.) Вы даже можете создавать гиперссылки на различные объекты на вашем листе, такие как командная кнопка в форме.
Что делать, если вы хотите запустить браузер и открыть HTML-файл из макроса VBA? Есть несколько способов сделать это. Первый – просто открыть новый объект Internet Explorer в вашем коде. Макрос для этого будет выглядеть следующим образом:
Sub DoBrowse1 () Dim, т.е. как набор объектов, т.е. = CreateObject («Internetexplorer.Application»), т.е.Visible = True, т.е. навигация «c: temp MyHTMLfile.htm «End Sub
Этот макрос откроет файл c: temp MyHTMLfile.htm в новом окне Internet Explorer. Если вместо этого вы хотите открыть веб-страницу из Интернета, вы можете сделать это, просто изменив, где вы хотите перемещаться. (Замените путь к файлу URL-адресом.)
Другой способ выполнить ту же задачу – положиться на Excel, чтобы выяснить, какой у вас браузер по умолчанию, и открыть ресурс HTML. Следующий макрос делает свое дело:
Sub DoBrowse2 () ActiveWorkbook.FollowHyperlink _ Address: = «c: temp MyHTMLfile.htm», _ NewWindow: = TrueEnd Sub
Опять же, браузер открывает новое окно и отображает указанный файл. Вы можете изменить параметр Address на любой URL-адрес, который хотите.
Источник: