Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

EXCEL macro stampa e salva

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

EXCEL macro stampa e salva

Postdi blunotte13 » 28/01/10 19:36

Ciao a tutti, ho quasi finito la mia fattura ma mi mancano ancora 3 passaggi che mi stanno facendo impazzire; sono riuscito, grazie a questa discussione viewtopic.php?p=434366, a creare questa macro che mi permette di stampare e di salvare la fattura in una specifica cartella

Sub salvamod()
'
' salvamod Macro
' Macro registrata il 27/01/2010 da abc
'

'
Application.Goto Reference:="Print_Area"
ActiveWindow.SelectedSheets.PrintOut Copies:=2, Collate:=True
Application.Goto Reference:="Print_Area"
Selection.Copy
Workbooks.Add
ActiveSheet.Paste
Sheets("Foglio2").Select
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.Delete
Sheets("Foglio3").Select
ActiveWindow.SelectedSheets.Delete
Path = "D:\prova/"
Fl = InputBox("Nome file", "Salva")
PathTot = Path & Fl
ActiveWorkbook.SaveAs Filename:=PathTot
ActiveWorkbook.Close
ThisWorkbook.Close SaveChanges:=False
End Sub

avrei bisogno, se fosse possibile, di includere in questa macro un comando per salvare il file in pdf, la stampante pdf si chiama doPDF V6, e dare il nome al file prendendo i valori da 3 determinate celle.

Ringrazio in anticipo per l'aiuto, ciao ciao !!

P.S. ho fatto ricerche per modificare la macro ma non ci sono proprio riuscito...!!
Alla prossima, ciao ciao !!


Excel 2007
blunotte13
Utente Senior
 
Post: 116
Iscritto il: 13/01/10 19:35

Sponsor
 

Re: EXCEL macro stampa e salva

Postdi Anthony47 » 28/01/10 23:10

La richiesta e' discussa nel forum di doPDF, es http://www.dopdf.com/forum/topic/create ... post-1010; la risposta e' "vedremo in futuro se si puo' inserire la prestazione"

Ciao.
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13892
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: EXCEL macro stampa e salva

Postdi blunotte13 » 29/01/10 00:35

Peccato cercherò qualcos'altro.
A presto e grazie !
Alla prossima, ciao ciao !!


Excel 2007
blunotte13
Utente Senior
 
Post: 116
Iscritto il: 13/01/10 19:35

Re: EXCEL macro stampa e salva

Postdi Anthony47 » 29/01/10 14:58

Nello stesso forum ricordano che il filename per il file pdf e' di default quello del file excel; per cui una possibile miglioria potrebbe essere di salvare il file excel in una directory di servizio con il nome che vuoi poi assegnare al file pdf, cosi' quando lanci la stampa devi solo "confermare" il nome che ti propone.
Nella stessa macro puoi, dopo la chiusura del file excel, cancellare il contenuto della directory di servizio ad esempio lanciando (col comando Shell) un file .bat che cancella tutti i files di quella directory.
Mi sembra che hai una certa familiarita' col vba, comunque se vuoi consigli su queste cose prova a postare ancora.

So che altre "stampanti pdf" hanno il supporto vba, io non ho esperienza con nessuno di questi; ti potrei raccontare che cosa scrivono nei forum di assistenza, ...ma forse e' piu' semplice che ci sbirci tu direttamente.

Ciao.
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13892
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: EXCEL macro stampa e salva

Postdi blunotte13 » 29/01/10 19:40

Grazie della dritta, proverò a studiarci ancora un pò su questa cosa.
A presto ciao ciao !!
Alla prossima, ciao ciao !!


Excel 2007
blunotte13
Utente Senior
 
Post: 116
Iscritto il: 13/01/10 19:35

Re: EXCEL macro stampa e salva

Postdi blunotte13 » 31/01/10 13:37

Ciao a tutti, posto solo per segnalare che ho risolto il problema del post, ho rifatto una nuova ricerca su google ed ho trovato una stampante pdf che si chiama BULLZIP, ho provato ad adattare la macro che ho trovato sempre con google e per adesso funziona, devo solo finire gli ultimi ritocchi per far in modo che prenda in automatio il nome che voglio io.

Spero che questa segnalazione possa aiutare chi come me cercava una soluzione alla stampa pdf.

Ciao ciao !!
Alla prossima, ciao ciao !!


Excel 2007
blunotte13
Utente Senior
 
Post: 116
Iscritto il: 13/01/10 19:35

Re: EXCEL macro stampa e salva

Postdi blunotte13 » 01/02/10 18:55

Ciao a tutti, ho bisogno di un aiuto per completare il mio modello, avendo la testa molto dura ho provato a creare la macro usando doPDF e sono riuscito a farla funzionare al 98%, mi mancano solo 2 piccoli passaggi che proprio non mi vengono, allego la nuova macro che ho creato

Application.Goto Reference:="Print_Area"
Selection.Copy
Workbooks.Add
Range("A1:I54").Select
ActiveWorkbook.Names.Add Name:="Print_Area", RefersToR1C1:= _
"=Foglio1!R1C1:R54C9"
ActiveSheet.Paste
Sheets("Foglio3").Select
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.Delete
Sheets("Foglio2").Select
ActiveWindow.SelectedSheets.Delete
Path = "D:\prova\"
nome = "D:\prova\" & [B12] & " " & [G6] & " " & [G10] & " " & [G9] & ".xls"
ActiveWorkbook.SaveAs nome
Application.Goto Reference:="Print_Area"
ActiveWindow.SelectedSheets.PrintOut Copies:=2, Collate:=True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"doPDF v6 su DOP6:"
Application.ActivePrinter = "doPDF v6 su DOP6:"
SavePath = "D:\prova\pdf\"
Name = "D:\prova\pdf\" & [B12] & " " & [G6] & " " & [G10] & " " & [G9] & ".pdf"


If PrinterChanged Then ActivePrinter = storeprinter

ActiveWorkbook.Close
ThisWorkbook.Close SaveChanges:=False


la prima cosa che non riesco a scrivere è la stringa per tornare alla stampante reale inserendo questa stringa
" If PrinterChanged Then ActivePrinter = storeprinter " la stampante non si cambia e resta attiva quella virtuale.

Il secondo è una cosa marginale ma se si può fare qualcosa meglio, ovvero di default il programma doPDF mi apre il pdf appena creato, ho provato qualche stringa recuperata qua e la per non far aprire il file creato ma mi da errore.

Avete soluzioni a riguardo ?

Grazie a tutti in anticipo, ciao ciao !!
Alla prossima, ciao ciao !!


Excel 2007
blunotte13
Utente Senior
 
Post: 116
Iscritto il: 13/01/10 19:35

Re: EXCEL macro stampa e salva

Postdi Anthony47 » 01/02/10 20:10

If PrinterChanged Then ActivePrinter = storeprinter
Che cosa rappresentano/contengono PrinterChanged e storeprinter?

Per il secondo problema, se non ottieni risposte qui (da altri utenti) ti consiglio proprio di cercare o postare sul forum di doPDF, all' indirizzo che ti avevo gia' dato.

Ciao.
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13892
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "EXCEL macro stampa e salva":


Chi c’è in linea

Visitano il forum: wallace&gromit e 13 ospiti