Szia!
A HIPERHIVATKOZÁS() függvénnyel ezt nagyon egyszerűen meg tudod csinálni.
Én azt csinálnám, hogy a 10 oszlop utáni első oszlopba tennék egy HIPERHIVATKOZÁS függvényt, paraméternek megadnám az első oszlop első URL-jét.
Majd elhúznám jobbra 10 oszlopot, utána dupla klikkel leküldeném a képletet az aljáig.
Sajnos, ha értékként megpróbálod visszatenni az eredeti oszlopokra, akkor elveszíti a hiperlink jellegét. Kék marad a szöveg, de nem lesz link.
Tehát így megduplázod az oszlopok számát.
Másik megoldás, hogy makróval ciklusban végigmenni cellánként a címeket tartalmazó tartományon, és mindegyiken végrehajtani a hiperlinkké alakítást.
Egy cellára így néz ki:
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
Selection.Text, TextToDisplay:=Selection.Text
Imre
.
