I just created a macro to copy and insert a spreadsheet. Here is the code:
Sub CopySpreadSheet()
'
' CopySpreadSheet Macro
' Copy a spreadsheet and insert it into a new spreadskeet
'
' Keyboard Shortcut: Ctrl+s
'
Sheets("Apr 03 - Apr 09, 2011").Select
Sheets("Apr 03 - Apr 09, 2011").Copy Before:=Sheets(15)
Sheets("Apr 03 - Apr 09, 2011 (2)").Select
Sheets("Apr 03 - Apr 09, 2011 (2)").Move After:=Sheets(16)
End Sub
Question: how do I edit the Macro to place the copied spreadsheet at the
“last” blank spreadsheet of the workbook. Reason I want to do this is the
macro is inserting the copied spreadsheet in the middle of my list of
spreadsheets. I'll have over 55 spreadsheets for this workbook, and 16 more
workbooks to do....when the macro is finished inserting I don't want to
have to manually move the inserted spreadsheet down the list ... as I go.
Thanks !!! ~Susan
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
