Macro to copy existing sheet to end

  • Thread starter Thread starter Steve
  • Start date Start date
S

Steve

I am creating a macro to make several copies of a particular worksheet and
move each succeeding one to the end (a choice when doing it manually).
However the macro recorder shows this >
Sheets("1").Copy After:=Sheets(8)
How can I generically make the "After:=Sheets(8)" into "After:=End"?
 
Just in case there are chart or template sheets:

Sheets(1).Copy After:=Sheets(Sheets.Count)
 
Back
Top