View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.misc
Jeff C Jeff C is offline
external usenet poster
 
Posts: 35
Default Script Errors Out

Thank you very much, I was so close but too far to figure out! I am
appreciative. Would someone share the syntax to get the current date placed
in the name of the tab?
--
Jeff C
Live Well .. Be Happy In All You Do


"Jim Rech" wrote:

You cannot use named arguments in a script, only by position.

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("c:\New.xls")
Set objWorkbook1 = objExcel.Workbooks.Open("c:\Existing.xls")

objWorkbook.Worksheets(1).Copy objWorkbook1.Worksheets(1)

objWorkbook1.Close True
objWorkbook.Close

--
Jim
"Jeff C" wrote in message
...
Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("New.xls")
Set objWorkbook1 = objExcel.Workbooks.Open("Existing.xls")

objWorkbook.Worksheets(1).Copy before_
objWorkbook1.Worksheets(1)

objWorkbook1.Close SaveChanges = True
objWorkbook.Close

There is one worksheet in New.xls which I want to copy and add to
Exisiting.xls as the top tab. The above errors out and I have re-written
so
many times I can't remember where I started. I also wanted to name the
new
worksheet with the date but couldn't get syntax that would work.

This is a *.vbs text file that I want to place in the task scheduler.

Am using MS Office Pro 2003. I appreciate any assist. Thanks
--
Jeff C
Live Well .. Be Happy In All You Do