Forum Discussion

Copper Contributor

Sep 25, 2021

Filter to a a new sheet

Hi Team, is it Possible to filter a table and Excel to automatically paste the filtered content to new sheets in the same workbook? Kind regards Paul Kimani

Formulas and Functions

Juliano-Petrukio

Bronze Contributor

Sep 25, 2021

Wasalome

Sub CopyVisibleRange()    
    ActiveSheet.UsedRange.Offset(1, 0).SpecialCells _
        (xlCellTypeVisible).Copy _
        Sheets("Destination").Range("A" & Rows.Count).End(xlUp).Offset(1, 0)
End Sub