excel - select the entire filtered rows and not just the cell

Question

Private Sub cbCWorker_Change()

With Sheet3
        Dim lastRow As Long
        lastRow = .Cells(.Rows.Count, 1).End(xlUp).Row
        Dim filterRange As Range
        Set filterRange = .Range("A2:F" & lastRow)
    
        With filterRange
            .AutoFilter 1, lblTask.Caption
            Dim filter As Range
            Set filter = .Range("A2:F" & lastRow).SpecialCells(xlCellTypeVisible)
            lbCWorker.List = Worksheets("Resource Planning_EMP").Range(filter, filter.End(xlDown)).value

        End With
    
End With
End Sub

The above code is only showing the first filtered cell but I want to see the entire rows containing the filtered data.

question from:https://stackoverflow.com/questions/65881592/select-the-entire-filtered-rows-and-not-just-the-cell

Answer 1

Waitting for answers