Impoting excel sheet to new workbook

[kumark]

HI All,

I have a excel workbook which contains 6-7 sheets. i want to write a
vba code .. so that when i run, it should create a new work book on m
desktop and import all the 7 sheets from the source Workbook.


Regards
Kuma

 

[Don Guillett]

HI All,



I have a excel workbook which contains 6-7 sheets. i want to write a

vba code .. so that when i run, it should create a new work book on my

desktop and import all the 7 sheets from the source Workbook.





Regards

Kumar

Have you considered using saveAS

 

[Auric__]

Have you considered using saveAS

Or copying the existing file?

 

[kumark]

Don Guillett wrote:
-

Or copying the existing file?

Sub ImportTemplate()
FileCopy "c:\Adventure.xlsm", _
ActiveWorkbook.Path & "Adventureworks.xlsm"

Name "C:\WorkedAdventist.xlsm" As "C:\Documents and Settings\Al
users\Desktop\Adventist.xlsm"
End Su