Discussione:
pseudo macro per stampare file in determinata stampante,salvare file in cartella specifica
(troppo vecchio per rispondere)
Valerio
2008-03-27 07:59:34 UTC
Permalink
Ciao a tutti...

Vi spiego il problema che ho e che con EXCEL tramite l'utilizzo delle
MACRO so che si puo' risolvere, mentre in WORD non so se è possibile o
come farlo.
Io ho creato un MODELLO WORD in cui sono da compilare degli ordini, ho
la necessità che una volta completata la compilazione, con un tasto in
automatico mi venga stampato tale documento su una specifica stampante
in rete ( che non è la predefinita del sistema), e nello stesso
momento questo file mi venga salvato in una apposita cartella ORDINI.

E' possibile e se sì, come si deve fare???
Grazie, a tutti... ciao
Giovanni Zezza
2008-03-27 09:35:44 UTC
Permalink
Post by Valerio
Vi spiego il problema che ho e che con EXCEL tramite l'utilizzo delle
MACRO so che si puo' risolvere, mentre in WORD non so se è possibile o
come farlo.
Io ho creato un MODELLO WORD in cui sono da compilare degli ordini, ho
la necessità che una volta completata la compilazione, con un tasto in
automatico mi venga stampato tale documento su una specifica stampante
in rete ( che non è la predefinita del sistema), e nello stesso
momento questo file mi venga salvato in una apposita cartella ORDINI.
Se lo sai fare in Excel lo sai fare anche in Word: l'oggetto di Word
corrispondente a Worksheet è Document, per il resto usi identicamente gli
stessi metodi, PrintOut per stampare e SaveAs per salvare (in Word non c'è
un contenitore analogo a Workbook, quindi salvi direttamente Document); la
stampante si seleziona attraverso la proprietà Application.ActivePrinter,
esattamente come in Excel.

Ciao.
Valerio
2008-03-28 08:23:33 UTC
Permalink
Ciao... forse mi hai sopravvalutato... In excel penso di riuscire a
farlo con le Macro, aiutandomi con il registratore di Macro e qualche
codice che ho già usato... ma in Word e linguaggio da usare sono a
Zero...
Ci sono strumenti analoghi al registratore di macro in word??
altrimenti ti chiedo se potessi indicarmi come fare.
grazie mille..ciao.
Post by Giovanni Zezza
Se lo sai fare in Excel lo sai fare anche in Word: l'oggetto di Word
corrispondente a Worksheet è Document, per il resto usi identicamente gli
stessi metodi, PrintOut per stampare e SaveAs per salvare (in Word non c'è
un contenitore analogo a Workbook, quindi salvi direttamente Document); la
stampante si seleziona attraverso la proprietà Application.ActivePrinter,
esattamente come in Excel.
Ciao.
Giovanni Zezza
2008-03-28 10:18:20 UTC
Permalink
Post by Valerio
Ciao... forse mi hai sopravvalutato... In excel penso di riuscire a
farlo con le Macro, aiutandomi con il registratore di Macro e qualche
codice che ho già usato... ma in Word e linguaggio da usare sono a
Zero...
Ti ho detto, identicamente lo stesso linguaggio, identicamente nello stesso
modo, con identicamente gli stessi metodi. Cambia solo l'oggetto.
Si può addirittura pensare di scrivere una procedura generica che fa la
stessa cosa con un foglio di Excel o con un documento di Word, secondo
quello che le viene passato.

Se "pensi di riuscire a farlo con le Macro" in Excel, "pensi di riuscire a
farlo con le Macro" in Word.
Post by Valerio
Ci sono strumenti analoghi al registratore di macro in word??
Sì! si chiama, pensa... registratore di macro.

Cambi la stampante predefinita attraverso la proprietà
Application.ActivePrinter:

Dim stampante_precedente As String
stampante_ precedente = Application.ActivePrinter

Application.ActivePrinter = "Il nome che vedi in Impostazioni Stampanti"


Stampi il documento con il metodo Document.PrintOut:


ActiveDocument.PrintOut


E lo salvi con il metodo Document.SaveAs:

ActiveDocument.SaveAs "il nome e il percorso che vuoi"


Quindi rimetti al suo posto la stampante:

Application.ActivePrinter = stampante_precedente

Ciao.
Valerio
2008-03-31 09:40:17 UTC
Permalink
Grazie tante.. a tutti
Post by Giovanni Zezza
Post by Valerio
Ci sono strumenti analoghi al registratore di macro in word??
Sì! si chiama, pensa... registratore di macro.
Cambi la stampante predefinita attraverso la proprietà
Dim stampante_precedente As String
stampante_ precedente = Application.ActivePrinter
Application.ActivePrinter = "Il nome che vedi in Impostazioni Stampanti"
ActiveDocument.PrintOut
ActiveDocument.SaveAs "il nome e il percorso che vuoi"
Application.ActivePrinter = stampante_precedente
Ciao.
Tiziano Marmiroli
2008-03-28 08:47:15 UTC
Permalink
Post by Valerio
Io ho creato un MODELLO WORD in cui sono da compilare degli ordini, ho
la necessità che una volta completata la compilazione, con un tasto in
automatico mi venga stampato tale documento su una specifica stampante
in rete ( che non è la predefinita del sistema), e nello stesso
momento questo file mi venga salvato in una apposita cartella ORDINI.
Newsgroups: microsoft.public.it.office.word
Subject: Re: Selezionare stampante
Date: Wed, 19 Oct 2005 03:25:56 +0200
http://www.google.it/groups?threadm=2t7bl11coji5rpn1pgbo1jv4tnvh5788pg%404ax.com
--
Tiziano Marmiroli
Microsoft MVP - Office System
Loading...