$excel = CreateObject OLE "Excel.Application";
$workbook = $excel -> Workbooks -> Open(file name);
$workbook->PrintOut();

##</code><code>##

Application.ActivePrinter = _
        "Auto HP Deskjet 6500 Series on HOMEDELLTOWER on Ne02:"
    ExecuteExcel4Macro _
        "PRINT(1,,,1,,,,,,,,3,""Auto HP Deskjet 6500 Series on HOMEDELLTOWER on Ne02:"",,TRUE,,FALSE)"

##</code><code>##

Application->ActivePrinter( "Auto HP Deskjet 6500 Series on HOMEDELLTOWER on Ne02:");