Vediamo come estrarre, tramite una funzione, l’URL completo presente nel testo di un collegamento ipertestuale in una cella di Excel.

Dovendo lavorare tramite codice VBA apriamo la relativa finestra.

In Excel XP o 2003:
Menù Strumenti – Macro – Visual Basic Editor

In Excel 2007:
Bottone di Office – Pulsante Opzioni di Excel – Impostazioni generali – Opzione “Mostra scheda Sviluppo sulla barra multifunzione”
A questo punto ritornando nella finestra di Excel verrà visualizzata anche la Scheda Sviluppo nella quale troviamo il pulsante Visual Basic

Nella finestra Visual Basic inserire un nuovo modulo (menù Inserisci – Modulo)
Copiare il codice riportato sotto:

Public Function Estrai_Indirizzi(ByVal Collegamento As Excel.Range)

Estrai_Indirizzi = Replace _
(Collegamento.Hyperlinks(1).Address, “mailto:”, “”)

End Function

Chiudere la finestra e ritornare in Excel.
La funzione che deve essere inserita per estrarre l’URL completo del collegamento ipertestuale è la seguente:

=Estrai_Indirizzi(Riferimento)

In cui:
Riferimento: La cella che contiene il collegamento ipertestuale del quale si vuole estrarre l’URL completo.

Esempio:
=Estrai_Indirizzi(Riferimento)

Tags: , , , ,

Come sei diventato blogger?
A 257 all'ora in autostrada: chi racconta balle, La Repubblica o la Polizia di Stato?

Informatics, ski racer, loves Finland, Norway, mountains, squash, photography, Drones and RC Helicopter – Snapchat: andrea.perotti

Translate »