Paste Formulas With VBA

I am trying to paste formulas. The below is a snippet of my code. What part of line 3 and the ".copy" should I change?




Line 1:With .AutoFilter.Range
Line 2: Set ws = Worksheets.Add(After:=Worksheets(Worksheets.Count))
Line 3: .Resize(, .Columns.Count - 1).Copy ws.Range("A1")

Thanks!

Please see sample attached. Yes, I thought the range having the formulas would carry over, but they're not. Feel free to look around the macros are STEP1 and STEP2.

I find it strange that your code does not work as is. I do not know why

=1+1

is pasted as

2

But for a fix, replace Line 3 (from your first post) with this:

Please Login or Register  to view this content.

works perfectly.

Thank You!