How to filter data with hyperlinks in Excel?

In Excel, you can filter data by certain text, number, or font color, background color, but have you ever tried to filter all data with hyperlinks in a column as below screenshot shown? In this article, I introduce a VBA to quickly filter the hyperlinks in Excel.

Filter data with hyperlinks

Filter data with hyperlinks

1. Press Alt + F11 keys to enable the Microsoft Visual Basic for Applications window.

2. Click Insert > Module，copy and paste below code to the Module window.

VBA: Filter data with hyperlinks

  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. Press F5 key to select a column to filter.

4. Click OK, only the hyperlinks are displayed.