VBA script to copy workbook contents

[baron11]

how to copy contents of workbook 1 to workbook 2 ?

[RonMcK]

Malcolm posted the following snippet the other day:
[vba]Sub macro1()
Workbooks.Open Filename:="your source file.xls"
ActiveWorkbook.SaveAs "C:\your target file.xls"
End Sub
[/vba]
This should take care of the job for you.

HTH,

[baron11]

Thanks a lot Ron.

[mdmackillop]

but if you want to stay in the original workbook
[VBA] Sub macro1()
Workbooks.Open Filename:="your source file.xls"
ActiveWorkbook.SaveCopyAs "C:\your target file.xls"
End Sub [/VBA]