VBA Code to Copy Filtered Data to New Sheet in Excel
Published on:
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
Nazim Khan — Founder & Editor, TechGuruPlus.com
[MBA in Finance]
Nazim Khan has spent over ten years working with Excel, Tally and office documentation in accounts, finance and MIS roles. He has been running TechGuruPlus.com since 2016, where he publishes free editable templates for office work, and the YouTube channel Business Excel. He has trained more than 50,000 people online. Every template on this site is built and checked by him before it is published.
