Come estrarre gli indirizzi effettivi dai collegamenti ipertestuali in Excel?

Supponendo di avere un intervallo di celle che contengono collegamenti ipertestuali e ora è necessario vedere la destinazione reale dei collegamenti ipertestuali ed estrarli dai collegamenti ipertestuali come mostrato nella seguente schermata. Esistono modi semplici per risolvere rapidamente questo problema? Questo articolo ti guiderà a estrarre gli indirizzi effettivi da più collegamenti ipertestuali.

Estrai gli indirizzi effettivi dai collegamenti ipertestuali con la funzione Modifica collegamento ipertestuale

Estrai gli indirizzi reali dai collegamenti ipertestuali con Kutools per Excel in modo rapido e semplice

Estrai gli indirizzi effettivi dai collegamenti ipertestuali con il codice VBA

Estrai gli indirizzi effettivi dai collegamenti ipertestuali con la funzione User Definde

Estrai gli indirizzi effettivi dai collegamenti ipertestuali con la funzione Modifica collegamento ipertestuale

Qui, il Modifica collegamento ipertestuale può aiutarti a estrarre l'URL sottostante per ciascuno di questi collegamenti ipertestuali e a posizionare quell'indirizzo effettivo in una cella diversa. Puoi fare come questo:

1. Seleziona la cella con collegamento ipertestuale e fai clic con il pulsante destro del mouse, dal menu di scelta rapida, scegli Modifica collegamento ipertestuale, vedi screenshot:

2. E un Modifica collegamento ipertestuale apparirà la finestra di dialogo, seleziona e copia (Ctrl + C) l'intero URL da Indirizzo campo della finestra di dialogo.

3. Quindi chiudi la finestra di dialogo e incolla l'indirizzo effettivo nella cella che desideri.

Note:: Con questo metodo è possibile estrarre un solo indirizzo di collegamento ipertestuale ogni volta, ma se è necessario estrarre più collegamenti ipertestuali, è necessario applicare questa funzione ripetutamente.

Estrai gli indirizzi reali dai collegamenti ipertestuali con Kutools per Excel in modo rapido e semplice

Ecco uno strumento utile, chiamato Kutools for Excel, Con la sua Converti collegamenti ipertestuali caratteristica, puoi gestire rapidamente le seguenti operazioni:

• Estrai gli indirizzi effettivi dai collegamenti ipertestuali;
• Converti il ​​testo dell'URL in collegamenti ipertestuali cliccabili.

Se hai installato Kutools for Excel, si prega di fare come segue:

1. Seleziona l'intervallo che contiene i collegamenti ipertestuali da estrarre.

2. Clic Kutools > Link > Converti collegamenti ipertestuali, vedi screenshot:

3. Nel Converti collegamenti ipertestuali finestra di dialogo, selezionare Gli indirizzi dei collegamenti ipertestuali sostituiscono il contenuto delle celle opzione e fare clic pulsante da Intervallo di risultati per specificare una cella in cui inserire il risultato.

4. E poi clicca OK, gli indirizzi effettivi sono stati estratti dai collegamenti ipertestuali. Vedi screenshot:

Note:: Se desideri inserire gli indirizzi effettivi nell'intervallo originale, controlla Converti intervallo sorgente.

Scarica e prova gratuitamente Kutools per Excel ora!

Estrai gli indirizzi effettivi dai collegamenti ipertestuali con il codice VBA

Per molti collegamenti ipertestuali, il metodo sopra sarà noioso e dispendioso in termini di tempo, quindi il seguente codice VBA può aiutarti a estrarre rapidamente più indirizzi dai collegamenti ipertestuali contemporaneamente.

1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Modulie incolla il codice seguente nella finestra del modulo.

Sub Extracthyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    If Rng.Hyperlinks.Count > 0 Then
        Rng.Value = Rng.Hyperlinks.Item(1).Address
    End If
Next
End Sub

3. Quindi premere F5 chiave per eseguire il codice e viene visualizzata una finestra di dialogo per selezionare i collegamenti ipertestuali che si desidera estrarre gli indirizzi reali, vedere screenshot:

4. Quindi fare clic OKe il contenuto della cella selezionata è stato convertito negli indirizzi di collegamento ipertestuale reali nell'intervallo originale. Vedi screenshot:

Estrai gli indirizzi effettivi dai collegamenti ipertestuali con la funzione User Definde

La seguente funzione definita dall'utente può anche estrarre l'URl effettivo dai collegamenti ipertestuali.

1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Modulie incolla il codice seguente nel file Finestra del modulo.

Function GetURL(pWorkRng As Range) As String
'Updateby Extendoffice
    GetURL = pWorkRng.Hyperlinks(1).Address
End Function

3. Salva il codice e chiudi la finestra, seleziona una cella vuota per digitare questa formula = GetURL (A2) (A2 è la cella in cui si trova il collegamento ipertestuale) e premere entrare pulsante. Puoi vedere che il vero indirizzo del collegamento ipertestuale è stato estratto.

Articolo correlato:

Come convertire il testo dell'URL in un collegamento ipertestuale cliccabile in Excel?