I have this code that works fine in that it copies data from 'import_sheet' to another WB and saves it to my desktop
My problem is,
It copies everything including a row filter I have applied to 'import_sheet'
I need to just copy the data over that is visible on the 'import_sheet'
Any help is always apprciated TY
Sub GenerateCSV()
Dim Path As String
ThisWorkbook.Sheets("import_csv").Copy
Path = CreateObject("WScript.Shell").SpecialFolders("Desktop") & "\"
ActiveWorkbook.SaveAs Path & "rosterapps_BOS_" & Format(Now, "yyyymmddhhmm ") & ".xlsx"
End Sub