Hi rasonline
I believe I've encountered this issue in the past. Try creating the new sheet BEFORE the code to copy Filtered Data. Then do your copy paste.
Something like this (NOT tested)
Sheets.Add ActiveSheet.Name = "Norefs" 'Do your filtering here then the Copy/Paste Sheets("Import").SpecialCells(xlCellTypeVisible).Copy Destination=Sheets("Norefs").Range("A5")
John
If you have issues with Code I've provided, I appreciate your feedback.
In the event Code provided resolves your issue, please mark your Thread as SOLVED.
If you're satisfied by any members response to your issue please use the star icon at the lower left of their post.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks