Перейти к контенту →

Как извлечь линк (ссылку) из гиперссылки Excel

Я столкнулся с тем, что нужно было извлечь линк (ссылку) из гиперссылки excel, другими словами извлечь ссылки со списка текста с гиперссылками в Excel.

Чтобы извлечь ссылки из гиперссылок и поместить их в соседний столбик нужно выполнить несколько простых шагов.

Извлекаем ссылку из xls:

  • Открыть документ Excel.
  • Выделите столбик с гиперссылками
  • Перейти в режим VBA (Alt+F11)
  • Вставить новый модуль (Insert > Module)
  • Скопировать код (ниже) и вставить в открывшееся окно
Sub ExtractHL()
Dim HL As Hyperlink
For Each HL In ActiveSheet.Hyperlinks
HL.Range.Offset(0, 1).Value = HL.Address
Next
End Sub
  • Нажать F5, чтобы запустить макрос
  • Выйти из VBA (Alt+Q)

После это в столбике справа должны появится отдельные ссылки.

источник

Published in полезно софт

Comments

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *

одиннадцать − десять =