Может кому-то пригодится эта информация.
Мне клиент прислал excel документ, в котором линки вшиты каждую ячейку (гипер-ссылка) и вот таких вот ссылок почти 100 штук, и чтобы доставать все не ручками, можно это все сделать секунд за 15.
1. Открыть документ Excel.
2. Выделите столбик с гиперссылками
3. Перейти в режим VBA (Alt+F11)
4. Вставить новый модуль (Insert > Module)
5. Скопировать код (ниже) и вставить в открывшееся окно
Sub ExtractHL()
Dim HL As Hyperlink
For Each HL In ActiveSheet.Hyperlinks
HL.Range.Offset(0, 1).Value = HL.Address
Next
End Sub
6. Нажать F5, чтобы запустить макрос
7. Выйти из VBA (Alt+Q)
Надеюсь было полезно)
p.s. может знаете более простой вариант, то поделитесь в комментарии под этим постом
https://www.facebook.com/photo.php?fbid=1448821238508337&set=a.161013880622419.33969.100001414239762&type=3&theater
