Я использую следующий код, чтобы открыть несколько гиперссылок в нескольких вкладках из Excel в одном окне:Открытие нескольких гиперссылок в одном окне с помощью Internet Explorer
Sub Open_Hyperlinks()
Range("C10:C17").Select
Dim hl as Hyperlink
On Error resume next
for Each hl in selection.Hyperlinks
hl.Follow
Next hl
End Sub
Но я хотел бы включать в себя конкретные инструкции, чтобы открыть гиперссылки с использованием Internet Explorer, а не настройки браузера по умолчанию в моем терминале из-за того, что для прав администратора я не могу его изменить.
Вы знаете, как включить эту инструкцию?
я использую инструкция следующим образом:
Sub Open_Hyperlinks() _Range. ("C10: C17") Выберите Dim гектолитров как гиперссылку
Вызов Shell (. "C: \ Program Files \ Internet Explorer \ iexplore.exe -url" и гл Адрес, vbMaximizedFocus) On Error Resume Next для каждого гектолитров в selection.Hyperlinks hl.Follow Next End -л Sub_
но появляется ошибка messa ge:
Ошибка времени выполнения 91: переменная объекта или с переменной блока не установлена, знаете ли вы, что это значит? – Sergio
Вам нужно поставить 'call' в свой' for' цикл, удалить 'hl.Follow' и заменить на указанную мной строку. – Fabien