Hi guys i have this macro to copy paste sheets to another sheet on another
workbook, can you help me?i need everytime i run the macro to paste it to
the next blank worksheet of the destiny workbook. 1001 thanks in advance
Sub copy_another_sheet()
'
' copy Macro
'
' Atalho por teclado: Ctrl+p
'
Application.ScreenUpdating = False
Sheets("Brands").Select
Cells.Select
Selection.copy
Windows("Comparsheet.xlsx").Activate
Sheets("Sheet1").Select ------> I think i have
to change this but i don´t know how!
Cells.Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Windows("Brand.xlsx").Activate
Range("A1").Select
Application.ScreenUpdating = True
End Sub
--
----------------------------------------------------------------------------------
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
