Copiare Url da cella "hyperlink"

[Omocaig]

Ciao,
premetto che non saprei mai come ringraziarvi per l'aiuto che mi avete dato in passato. Avrei bisogno nuovamente di voi per un problema esistenziale.

Ho un file excel con delle celle contententi degli Hyperlink. Non riesco a capire come copiare ed incollare l'url in una cella adiacente.

Sapreste dirmi se è possibile?

Grazie mille,
Giacomo

[Anthony47]

premetto che non saprei mai come ringraziarvi per l'aiuto che mi avete dato in passato. Avrei bisogno nuovamente di voi per un problema esistenziale.

Eh, basta un "Grazie" al momento giusto e tutto va a posto...

Ho un file excel con delle celle contententi degli Hyperlink. Non riesco a capire come copiare ed incollare l'url in una cella adiacente.
Sapreste dirmi se è possibile?

Sì, è possibile

Ma poichè siamo abituati ad andare oltre alla risposta essenziale, ti suggerisco anche una macro che potrebbe fare la cosa:
-copia questo codice in un modulo standard del tuo progetto vba

Codice: Seleziona tutto

Sub GetHLink()
Dim hlCol As String, myC As Range
'
hlCol = "E"                             '<<< La colonna dove creare l'elenco
For Each myC In Range("A1:A1000")       '<<< L'intervallo da esaminare
    If myC.Hyperlinks.Count > 0 Then
        Cells(myC.Row, hlCol).Value = myC.Hyperlinks(1).Address & myC.Hyperlinks(1).SubAddress
    End If
Next myC
Beep
End Sub

-personalizza le due istruzioni marcate <<<
Ho immaginato, dovendo fare il riepilogo in una colonna, che l'intervallo da esaminare sia composto da una sola colonna.

Quando sei pronto, seleziona il foglio da esaminare e lancia la Sub GetHLink

Fai sapere...

D:\DDownloads\[MULTI_C20910.xlsm]Foglio3

[Omocaig]

Ciao Anthony47

funziona alla grande !!!

Grazie infinite