Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Lancio stampa Excel in batch

315 views
Skip to first unread message

Piro

unread,
Nov 23, 2008, 5:32:26 AM11/23/08
to
Buona giornata a tutti
Sono un nuovo del newsgroup.

Chiedo un'informazione a chi e' piu' esperto di me.

Dovrei lanciare la stampa di un documento excel da riga di comando, pero'
non so come fare.

Per fare un esempio, so che su openoffice e' possibile lanciare da riga di
comando il
foglio di calcolo, parametro -p e nome documento, viene eseguita la stampa
e la chiusura del foglio di calcolo
senza nessun intervento da parte dell'utente.

Io dovre fare qualcosa di simile, il documento excel viene preparato da
altro PC, poi mandato al server e
da qui dovrebbe essere stampato da riga di comando con visualizzatore di
excel.

Purtroppo il visualizzatore excel non interpreta le macro, percio' non e'
possibile intervenire con macro.

Se qualcuno mi puo' dare qualche indicazione mi fa una cortesia.

Grazie
Piro

Mauro Gamberini

unread,
Nov 24, 2008, 4:03:28 AM11/24/08
to
> Dovrei lanciare la stampa di un documento excel da riga di comando, pero'
> non so come fare.
>
> Per fare un esempio, so che su openoffice e' possibile lanciare da riga di
> comando il
> foglio di calcolo, parametro -p e nome documento, viene eseguita la
> stampa e la chiusura del foglio di calcolo
> senza nessun intervento da parte dell'utente.
>
> Io dovre fare qualcosa di simile, il documento excel viene preparato da
> altro PC, poi mandato al server e
> da qui dovrebbe essere stampato da riga di comando con visualizzatore di
> excel.
>

Prova a copia/incollare questo
su di un file di testo, modificarne
l'estensione in .vbs, copiarlo e lanciarlo
sul server:

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("c:\tuoFile.xls")

objWorkbook.PrintOut()
objExcel.Quit

Set objWorkbook = Nothing
Set objExcel = Nothing

Modifica i riferimenti con i tuoi.

Nel caso il nome file sia variabile:

Set objExcel = CreateObject("Excel.Application")
s = Inputbox("Inserire nome file")
Set objWorkbook = objExcel.Workbooks.Open("c:\" & s & ".xls")

objWorkbook.PrintOut()
objExcel.Quit

Set objWorkbook = Nothing
Set objExcel = Nothing

Sinceramente non so se funziona con solo il visualizzatore
di Excel installato sul server.

--
---------------------------
Mauro Gamberini
http://www.riolab.org/


Piro

unread,
Nov 28, 2008, 3:49:57 PM11/28/08
to
Ciao a tutti.
ho provato quanto hai suggerito.
Con excel funziona correttamente.
Con il visualizzatore del server, prima mi ha chiesto di installare MDAC2,
poi segnala altri errori che non comprendo.
Penso che non esista Excel.application, perche' il programma del
visualizzatore si chiama XLWIEWER.exe
Mauro, grazie comunque, abbiamo provato.
ciao
Piro

"Mauro Gamberini" <maurogsc...@RIMUOVEREaliceposta.it> ha scritto nel
messaggio news:e3%23jFOhT...@TK2MSFTNGP06.phx.gbl...

Mauro Gamberini

unread,
Nov 30, 2008, 5:50:16 AM11/30/08
to
> ho provato quanto hai suggerito.
> Con excel funziona correttamente.
> Con il visualizzatore del server, prima mi ha chiesto di installare MDAC2,
> poi segnala altri errori che non comprendo.
> Penso che non esista Excel.application, perche' il programma del
> visualizzatore si chiama XLWIEWER.exe
> Mauro, grazie comunque, abbiamo provato.
>

Guarda qui:
http://groups.google.com/group/microsoft.public.scripting.vbscript/browse_thread/thread/849b31d0f979bbe0/4ae00d21c0d3931e?lnk=raot

Se fai una ricerca, forse forse...

0 new messages