Originally Posted By: Witto

 Code:
;Select data range (cell at bottom right of data range)
$RC = $objExcel.Range("A1:P1285")
Is your excel sheet always 1285 rows deep?

In this particular case, yes, this Excel list is "always" 1285 rows deep.
Anyway that was the only way I could make it work with the complete data range.

 Originally Posted By: Witto

I think you missed a "(" here:
$RC = $objExcel.ActiveWorkbook.SaveAs(@SCRIPTDIR+"\"+$Manager+".xls",,,,,False)

Correct. Dont know how it was missed.

Note, in this case the Excel list is in 2007 format xlsx. When saving the new workbooks I chose to save them in XP/2003 compatible file format, using FileFormat values "56" (xlExcel8).
 Code:
$RC = $objExcel.ActiveWorkbook.SaveAs(@SCRIPTDIR+"\"+$Manager+".xls",56,,,,False)

The code is working fine for me, anyway I will check the kixtarter too.
_________________________
"... Great minds talk about idea' s, average minds talk about events and samll minds talks about people...!"