Открыть все ссылки в Excel

Доступно в бесплатной версии !SEMTools для Excel.

В Excel удобно хранить списки ссылок — на документы, сайты, анкеты, отчёты. Но если нужно открыть сразу множество ссылок из выделенного диапазона, приходится щёлкать их по одной. Это неудобно и медленно, а еще можно что-то пропустить.

Как открыть в Excel все ссылки сразу

Штатными возможностями решить подобную задачу, к сожалению, нельзя. Решений два: либо использовать VBA, либо бесплатную процедуру в надстройке !SEMTools.

С помощью макроса

Вот простой макрос, который перебирает выделенные ячейки и открывает все, где найдена гиперссылка:

Sub ОткрытьВыделенныеСсылки()
    Dim cell As Range
    On Error Resume Next
    For Each cell In Selection
        If cell.Hyperlinks.Count > 0 Then
            cell.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
        End If
    Next cell
End Sub

Как использовать:

• Открыть вкладку Разработчик → Visual Basic
• Создать модуль и вставить в него код выше
• Выделить нужные ячейки
• Нажать Alt+F8 → запустить процедуру ОткрытьВыделенныеСсылки

Макрос откроет все корректные гиперссылки в браузере или в приложении по умолчанию. Если ваши ссылки при этом сохранены как текст, процедура ничего не откроет.

С помощью !SEMTools

Если у вас установлена надстройка !SEMTools, всё проще:

• Откройте вкладку !SEMTools
• Выберите в разделе PPC & SEO инструменты команду Извлечь – Из URL – открыть все в браузере
• Выделите диапазон со ссылками
• Нажмите ОК

Процедура откроет все ссылки в вашем браузере по умолчанию:

Важное отличие от предыдущего варианта в том, что ссылкой считается значение ячейки (текст, который вы видите), а не её ссылка. Иными словами, URL внутри ячеек могут фактически даже не быть ссылками, а быть сохранены как текст, но процедура прекрасно откроет их все.

Поэтому, если текст ссылки и ссылка в вашей гиперссылке не совпадают, вам потребуется процедура “Извлечь ссылки из гиперссылок“. Она также не реализуема штатными процедурами и функциями Excel, но есть в !SEMTools.