![admin](./pictures/avatars/55b5f7254d5a7.jpg)
Finta neexistuje, ale máme tu makra
. Uvedený příklad je pro názvy filmů s hypertextovými odkazy ve sloupci A. Odkaz bude zapsán do vedlejší buňky, tedy sloupce B.
Sub hyperlinky()
Range("A1").Select
For Each h In Worksheets(1).Hyperlinks
ActiveCell.Offset(1, 0).Select
Cells(ActiveCell.Row, ActiveCell.Column + 1) = h.Address
Next
End Subcitovat
![2](./plugins/templates/wall_2C/images/smileys/2.gif)
Sub hyperlinky()
Range("A1").Select
For Each h In Worksheets(1).Hyperlinks
ActiveCell.Offset(1, 0).Select
Cells(ActiveCell.Row, ActiveCell.Column + 1) = h.Address
Next
End Subcitovat