Impoting excel sheet to new workbook

K

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
 
D

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
Click to expand...

Have you considered using saveAS
 
K

kumark

Auric__;1604188 said:
Don Guillett wrote:
-

Or copying the existing file?
Click to expand...






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
 
Top