Discussione:
macro di stampa pdf
(troppo vecchio per rispondere)
g***@gmail.com
2008-10-22 19:57:49 UTC
Permalink
Ciao a tutti,
ho creato una macro per la stampa di un foglio excel con pdf creator.
Come posso fare per far sì che la macro selezioni sempre come
stampante pdf creator quando la eseguo?
Ora come ora esegue la stampa con la stampante che è impostata in quel
momento mentre io vorrei che la macro riconoscesse pdf creator come
unica stampante.
Buona sera a tutti
elby
2008-10-22 21:05:49 UTC
Permalink
Ciao Giancarlo
Preliminarmente devi sapere come Excel vede la tua stampante virtuale.
Seleziona come stampante la PDFCreator e lancia la seguente istruzione
da finestra immediata del VBA:
?Application.ActivePrinter
Nel mio caso ottengo "PDFCreator su Ne00:"
Reimposta la stampante di default ( quella reale )
Il codice seguente 'stampa' i fogli selezionati della finestra attiva
con PDFCreator e alla fine reimposta la stampante a quella di Deafult.

Option Explicit
Sub StampaConPDFCreator()
Dim strDefaultPrinter As String
strDefaultPrinter = Application.ActivePrinter
Application.ActivePrinter = "PDFCreator su Ne00:"
ActiveWindow.SelectedSheets.PrintOut
Application.ActivePrinter = strDefaultPrinter
End Sub
Post by g***@gmail.com
Ciao a tutti,
ho creato una macro per la stampa di un foglio excel con pdf creator.
Come posso fare per far sì che la macro selezioni sempre come
stampante pdf creator quando la eseguo?
Ora come ora esegue la stampa con la stampante che è impostata in quel
momento mentre io vorrei che la macro riconoscesse pdf creator come
unica stampante.
Buona sera a tutti
g***@gmail.com
2008-10-23 04:45:24 UTC
Permalink
Post by elby
Ciao Giancarlo
Preliminarmente devi sapere come Excel vede la tua stampante virtuale.
Seleziona come stampante la PDFCreator e lancia la seguente istruzione
?Application.ActivePrinter
Nel mio caso ottengo "PDFCreator su Ne00:"
Reimposta la stampante di default ( quella reale )
Il codice seguente 'stampa' i fogli selezionati della finestra attiva
con PDFCreator e alla fine reimposta la stampante a quella di Deafult.
Option Explicit
Sub StampaConPDFCreator()
Dim strDefaultPrinter As String
strDefaultPrinter = Application.ActivePrinter
Application.ActivePrinter = "PDFCreator su Ne00:"
ActiveWindow.SelectedSheets.PrintOut
Application.ActivePrinter = strDefaultPrinter
End Sub
Post by g***@gmail.com
Ciao a tutti,
ho creato una macro per la stampa di un foglio excel con pdf creator.
Come posso fare per far sì che la macro selezioni sempre come
stampante pdf creator quando la eseguo?
Ora come ora esegue la stampa con la stampante che è impostata in quel
momento mentre io vorrei che la macro riconoscesse pdf creator come
unica stampante.
Buona sera a tutti
grazie mille
g***@gmail.com
2008-10-26 10:47:53 UTC
Permalink
Post by g***@gmail.com
Post by elby
Ciao Giancarlo
Preliminarmente devi sapere come Excel vede la tua stampante virtuale.
Seleziona come stampante la PDFCreator e lancia la seguente istruzione
?Application.ActivePrinter
Nel mio caso ottengo "PDFCreator su Ne00:"
Reimposta la stampante di default ( quella reale )
Il codice seguente 'stampa' i fogli selezionati della finestra attiva
con PDFCreator e alla fine reimposta la stampante a quella di Deafult.
Option Explicit
Sub StampaConPDFCreator()
Dim strDefaultPrinter As String
strDefaultPrinter = Application.ActivePrinter
Application.ActivePrinter = "PDFCreator su Ne00:"
ActiveWindow.SelectedSheets.PrintOut
Application.ActivePrinter = strDefaultPrinter
End Sub
Post by g***@gmail.com
Ciao a tutti,
ho creato una macro per la stampa di un foglio excel con pdf creator.
Come posso fare per far sì che la macro selezioni sempre come
stampante pdf creator quando la eseguo?
Ora come ora esegue la stampa con la stampante che è impostata in quel
momento mentre io vorrei che la macro riconoscesse pdf creator come
unica stampante.
Buona sera a tutti
grazie mille
Ciao,
la macro che mi hai passato funziona benissimo sul singolo pc.
Ma come faccio a fare in modo che funzioni su tutti i pc della rete
della mia azienda?
Sono più di 50 sedi in tutta Italia
g***@gmail.com
2008-10-27 06:51:54 UTC
Permalink
Post by elby
Ciao Giancarlo
Preliminarmente devi sapere come Excel vede la tua stampante virtuale.
Seleziona come stampante la PDFCreator e lancia la seguente istruzione
?Application.ActivePrinter
Nel mio caso ottengo "PDFCreator su Ne00:"
Reimposta la stampante di default ( quella reale )
Il codice seguente 'stampa' i fogli selezionati della finestra attiva
con PDFCreator e alla fine reimposta la stampante a quella di Deafult.
Option Explicit
Sub StampaConPDFCreator()
Dim strDefaultPrinter As String
strDefaultPrinter = Application.ActivePrinter
Application.ActivePrinter = "PDFCreator su Ne00:"
ActiveWindow.SelectedSheets.PrintOut
Application.ActivePrinter = strDefaultPrinter
End Sub
Post by g***@gmail.com
Ciao a tutti,
ho creato una macro per la stampa di un foglio excel con pdf creator.
Come posso fare per far sì che la macro selezioni sempre come
stampante pdf creator quando la eseguo?
Ora come ora esegue la stampa con la stampante che è impostata in quel
momento mentre io vorrei che la macro riconoscesse pdf creator come
unica stampante.
Buona sera a tutti
Ciao,
la macro funziona benissimo con il pc in azienda.
Ma come posso fare in modo che funzioni su tutti i pc dell'azienda?
Sono più di 50 punti vendita distribuiti in tutta Italia e risalire
sempre al nome del pc diventa un lavoro lunghissimo.
Buona giornata
Mauro Gamberini
2008-10-27 08:18:37 UTC
Permalink
la macro funziona benissimo con il pc in azienda.
Ma come posso fare in modo che funzioni su tutti i pc dell'azienda?
Sono più di 50 punti vendita distribuiti in tutta Italia e risalire
sempre al nome del pc diventa un lavoro lunghissimo.
Buona giornata
*************************************************

Non vedo alcun nesso fra la macro postata
ed il nome del pc.

Se(se) intendi il nome della stampante virtuale PDF,
stampante(qui se ho capito bene PDFCreator) ed
eventuali percorsi devono essere uguali.

Puoi creare un Add-in e distribuirlo.

Guarda qui:

http://www.google.it/search?hl=it&q=excel+create+add+in&meta=
--
---------------------------
Mauro Gamberini
http://www.riolab.org/
r
2008-10-29 17:14:01 UTC
Permalink
Post by g***@gmail.com
la macro funziona benissimo con il pc in azienda.
Ma come posso fare in modo che funzioni su tutti i pc dell'azienda?
Sono più di 50 punti vendita distribuiti in tutta Italia e risalire
sempre al nome del pc diventa un lavoro lunghissimo.
Buona giornata
*************************************************
Non vedo alcun nesso fra la macro postata
ed il nome del pc.
Se(se) intendi il nome della stampante virtuale PDF,
stampante(qui se ho capito bene PDFCreator) ed
eventuali percorsi devono essere uguali.
Puoi creare un Add-in e distribuirlo.
http://www.google.it/search?hl=it&q=excel+create+add+in&meta=
se tutti utilizzano pdfcreator il nome della
stampante è sempre quello ...
la macro funzionerà su tutti i pc

saluti
r
Mauro Gamberini
2008-10-29 17:25:24 UTC
Permalink
Post by r
se tutti utilizzano pdfcreator il nome della
stampante è sempre quello ...
la macro funzionerà su tutti i pc
Era il nome del pc che mi lasciava perplesso...

E comunque non è detto.
Utente/utonto che cambia il nome della stampante.
Non sappiamo quale policy sia attuata
su quei pc.... 8-)
--
---------------------------
Mauro Gamberini
http://www.riolab.org/
g***@gmail.com
2008-10-29 20:05:04 UTC
Permalink
On 29 Ott, 18:25, "Mauro Gamberini"
Post by Mauro Gamberini
Post by r
se tutti utilizzano pdfcreator il nome della
stampante è sempre quello ...
la macro funzionerà su tutti i pc
Era il nome del pc che mi lasciava perplesso...
E comunque non è detto.
Utente/utonto che cambia il nome della stampante.
Non sappiamo quale policy sia attuata
su quei pc.... 8-)
--
---------------------------
Mauro Gamberinihttp://www.riolab.org/
ok grazie

Continua a leggere su narkive:
Loading...