Impresion de Excel desde D.O.S.

Saludos MAS y Grupo:

Algunos programas de Windows y Office imprimen con el parámetro /P (como
NOTEPAD y WORDPAD), otros de una forma mas compleja con RUNDLL, aunque no
todos soportan este parámetro (Como OFFICE que usan /e, /n y DDE ), se puede
usar un Win Script ".VBS" para realizar esta misma tarea desde Windows o
DOS:

Sólo copie y pegue el siguiente código en un archivo llamado IMPDOC.VBS (Use
el Bloc de Notas):

' Inicio del script IMPDOC.VBS
Dim Archivo

Archivo = "C:\Documents and Settings\Willarman\Mis documentos\Distribucion
equipos.xls"
'Archivo = "C:\Documents and Settings\Willarman\Mis documentos\Protocolo de
red.doc"

Set objExcel = CreateObject("Excel.Application")
Set objDoc = objExcel.Workbooks.Open(Archivo)

'Set objWord = CreateObject("Word.Application")
'Set objDoc = objWord.Documents.Open(Archivo)

objDoc.PrintOut()

'objWord.Quit
objExcel.Quit
' Fin del Script IMPDOC.VBS

Como veran, el mismo script imprime un archivo de Word ó Excel. (basta con
quitar la comilla simple ' que comentarea la línea del código para Excel y
colocársela a las lineas de Word y viceversa).

Para ejecutarlo desde DOS:

Salimos al Prompt de Comandos C:>
y escribimos CSCRIPT IMPDOC.VBS

y Listo ! Facil ¿no?

Salu2 desde Cali
Willarman