Wie filtert man Daten mit Hyperlinks in Excel?

In Excel können Sie Daten nach bestimmtem Text, Zahlen, Schriftfarbe oder Hintergrundfarbe filtern, aber haben Sie schon einmal versucht, alle Daten mit Hyperlinks in einer Spalte zu filtern, wie im folgenden Screenshot gezeigt? In diesem Artikel stelle ich ein VBA vor, um schnell zu filtern und nur die Zeilen mit Hyperlinks in Excel anzuzeigen.

Daten mit Hyperlinks filtern

Daten mit Hyperlinks filtern

1. Drücken Sie die Tasten Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Klicken Sie auf Einfügen > Modul, kopieren und fügen Sie den folgenden Code in das Modulfenster ein.

VBA: Daten mit Hyperlinks filtern

Sub HyperPicker()
'UpdatebyExtendoffice20180404
    Dim xRg As Range
    Dim xCell As Range
    On Error Resume Next
    Set xRg = Application.InputBox("Select a column:", "Kutools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        If xCell.Hyperlinks.Count = 0 Then
            xCell.EntireRow.Hidden = True
        End If
    Next
End Sub

3. Drücken Sie die F5-Taste, um eine Spalte zum Filtern auszuwählen.

4. Klicken Sie auf OK, werden nur die Hyperlinks angezeigt.