VBA Code to Copy Filtered Data to New Sheet in Excel

This code copies the filtered data in the active worksheet to a new sheet.

VBA Code:

Sub CopyFilteredDataToNewSheet()
    Dim newSheet As Worksheet
    Set newSheet = Worksheets.Add
    ActiveSheet.UsedRange.SpecialCells(xlCellTypeVisible).Copy Destination:=newSheet.Range("A1")
End Sub

Check All VBA Codes

Join Our Telegram Group techguruplus telegram group Join Our WhatsApp Group techguruplus whatsapp group
Nazim Khan - Author Image

Nazim Khan (Author)

Nazim Khan is an expert in Microsoft Excel. He teaches people how to use it better. He has been doing this for more than ten years. He has a website and a YouTube channel called "Business Excel." He shares useful tips from his own experiences to help others improve their Excel skills and careers.

Leave a Comment