Hyperlinks löschen - VBA-Codebeispiele

Alle Hyperlinks aus einem Blatt löschen

Der folgende Code löscht alle Hyperlinks aus Sheet1:

12345 Sub DeleteHyperLinks()Sheet1.Hyperlinks.DeleteEnd Sub

Und wenn Sie keine wiederverwendbare Unterroutine benötigen, sondern eine einmalige Lösung, verwenden Sie das Direktfenster:

1. Wählen Sie das Blatt aus, aus dem Hyperlinks entfernt werden sollen

2. Drücken Sie Alt+F11, um die VBE zu öffnen

3. Wählen Sie im VBE-Hauptmenü Ansicht->Sofortiges Fenster

4. Fügen Sie im Direktfenster den folgenden Code ein und drücken Sie dann die Eingabetaste

1 ActiveSheet.Hyperlinks.Löschen

wave wave wave wave wave