07.09.2020
Как извлечь ссылку из гиперссылки в Excel?
Excel - популярный инструмент современного человека за работой на компьютере, но далеко не все владеют им досконально и в совершенстве.
Для извлечения ссылок из гиперссылок выполните следующие действия:
  1. Выделите столбец с гиперссылками
  2. Перейти в режим VBA (Alt+F11)
  3. Вставьте новый модуль (Insert > Module)
  4. Скопировать код (ниже) и вставить в открывшееся окно
  5. Нажать F5, чтобы запустить макрос
  6. Выйти из VBA (Alt+Q)
Код:
Sub ExtractHL()
Dim HL As Hyperlink
For Each HL In ActiveSheet.Hyperlinks
HL.Range.Offset(0, 1).Value = HL.Address
Next
End Sub

В столбике справа появятся отдельные ссылки.
Рассказать друзьям:

Интересные статьи