Wie extrahiere ich webadressen in excel?

Angenommen, Sie erhalten von Ihrem Kollegen eine Excel-Arbeitsmappe, in der Sie in einer Spalte eine Liste mit Hyperlinks haben. Aus dieser Liste möchten Sie nun alle Hyperlink-URLs extrahieren.

Die manuelle Methode bereitet echte Kopfschmerzen, Sie müssen jede URL einzeln kopieren und einfügen. Der beste Weg ist also , eine UDF in VBA zu erstellen . Und heute möchte ich Ihnen einen einfachen Code für diese UDF mitteilen.

VBA-Code zum Extrahieren von Hyperlink-URLs

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

So verwenden Sie diesen Code

Um diese UDF zu verwenden, müssen Sie die folgenden Schritte ausführen:

1. Öffnen Sie den Visual Basic-Editor über die Registerkarte „Entwickler“ oder verwenden Sie die Tastenkombination ALT+F11.
2. Fügen Sie ein neues Modul ein, fügen Sie den obigen Code ein und schließen Sie es.
3. Geben Sie nun in Ihrer Tabelle die Funktion =GiveMeURL(A1) ein und drücken Sie die Eingabetaste.