Code:
Dim $wbSource, $wbTarget, $xlApp, $srcWorksheet, $tgtWorksheet
$xlApp = CreateObject("Excel.Application")
$wbTarget = $xlApp.Workbooks.Open("c:\temp\xl\target.xls")
$wbSource = $xlApp.Workbooks.Open("c:\temp\xl\source.xls")
$srcWorksheet = $wbSource.Worksheets(1)
$tgtWorksheet = $wbTarget.Worksheets(2)
$srcWorksheet.Copy(, $tgtWorksheet)
$wbSource.Close(1) ;Although I think .Close will do
$wbTarget.Close(1)
$wbSource = ""
$wbTarget = ""
$srcWorksheet = ""
$tgtWorksheet = ""
$xlApp = ""