Come estrarre gli indirizzi web in excel?

Supponiamo di ricevere una cartella di lavoro Excel dal tuo collega in cui hai un elenco di collegamenti ipertestuali in una colonna. Ora, da questo elenco, vuoi estrarre tutti gli URL dei collegamenti ipertestuali.

Il metodo manuale è un vero grattacapo, devi copiare e incollare ogni URL uno per uno. Quindi il modo migliore è creare una UDF in VBA . E oggi vorrei condividere con voi un semplice codice per questa UDF.

Codice VBA per estrarre gli URL dei collegamenti ipertestuali

 Function GiveMeURL(rng As Range) As String On Error Resume Next GiveMeURL = rng.Hyperlinks(1).Address End Function

Come utilizzare questo codice

Per utilizzare questa UDF, è necessario seguire questi passaggi:

1. Apri Visual Basic Editor dalla scheda Sviluppatore o utilizza la scorciatoia da tastiera ALT+F11.
2. Inserisci un nuovo modulo, incollaci il codice sopra e chiudilo.
3. Ora, nel tuo foglio di calcolo, inserisci la funzione =GiveMeURL(A1) e premi Invio.