Brilliant, Thank you to you both. Both methods work exactly as I wanted.
As I'm sure its the same for everybody who posts here, hours I spent for something that you two have fixed in seconds. A great Post raised for you both.
Hi, I'm looking for some help with the above. I have:
Set WSNew = Worksheets.Add(After:=Sheets(ActiveSheet.Index))
(*1) My_Range.AutoFilter Field:=5, Criteria1:="=ARBO"
With My_Range.Parent.AutoFilter.range
(*2) .Copy Destination:=WSNew.range("A1")
End With
Now the...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.