drawworkhome
12-06-2009, 12:06 PM
hi all, im stumped..no suprise there.
i am trying to copy a shhet from workbook a to workbook b.
this is what i have so far.
ChDir (fldr)
Set Wk = Workbooks.add
Wk.SaveAs Filename:=fldr & "\" & jobfoldername
'//create subfolders here.....................................
'Replace "Sheet1" with the name of the sheet to be copied.
Stop
Workbooks("desktoppurchaseorder3").Sheets(1).copy _
after:=Workbooks(jobfoldername).Sheets(1)
any help is appreciated!
the sheet i want to copy is hidden if that makes a difference.
e
i am trying to copy a shhet from workbook a to workbook b.
this is what i have so far.
ChDir (fldr)
Set Wk = Workbooks.add
Wk.SaveAs Filename:=fldr & "\" & jobfoldername
'//create subfolders here.....................................
'Replace "Sheet1" with the name of the sheet to be copied.
Stop
Workbooks("desktoppurchaseorder3").Sheets(1).copy _
after:=Workbooks(jobfoldername).Sheets(1)
any help is appreciated!
the sheet i want to copy is hidden if that makes a difference.
e