Maybe something like:

Dim XLApp
Dim XLWkbk1
Dim XLWkbk2

Set XLApp = CreateObject("Excel.Application")
XLApp.Visible = True

Set XLWkbk1 = XLApp.Workbooks.Open("c:\my documents\excel\book1.xls")
Set XLWkbk2 = XLApp.Workbooks.Open("c:\my documents\excel\book2.xls")

XLWkbk1.Worksheets("sheet1").Copy _
XLWkbk2.Worksheets(1)

XLWkbk2.Close True

XLApp.Quit

Set XLWkbk2 = Nothing
Set XLWkbk1 = Nothing
Set XLApp = Nothing


..visible = true is nice for debugging.

Bill Ebbing wrote:
>
> I need to create a vbscript (Not VBA) to copy a worksheet from one workbook
> into another workbook.
>
> Any help would be appreciated.

--

Dave Peterson