Generare da stampa unione più documenti pdf

Anonimo
2012-12-12T19:27:39+00:00

Ho fatto una stampa unione (xls+word) al fine di generare fatture.

adesso dovrei per ogni fattura generare un pdf e nominare il relativo pdf, al fine di inviarla al cliente.

Questa procedura per le 40 fatture è comunque onerosa in quanto dovrei per ogni singola fattura stamparla in pdf salvarla sul dekstop e naturalmente nominarla secondo determinati criteri.

E' possibile dal documento di stampa unione generare in automatico le 40 fatture in formato pdf e possibilmente nominare i file secondo determinati criteri?

es.

fatt-30-12-dicembre-2012-cliente-rossi.pdf

Grazie!

Microsoft 365 e Office | Excel | Per la casa | Windows

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti
Risposta accettata dall'autore della domanda
Anonimo
2012-12-13T00:32:02+00:00

Ciao RichyVC

Intendi qualcosa del genere?

' Modulo1 - Modulo

'

Option Explicit

Public Sub Test()

On Error GoTo ErrH

Dim mm As Word.MailMerge

Dim i

    Application.ScreenUpdating = False

    Set mm = ThisDocument.MailMerge

    With mm

      .Destination = wdSendToNewDocument

      With .DataSource

        For i = 1 To .RecordCount

          .FirstRecord = i

          .LastRecord = i

          mm.Execute

          With Application.ActiveDocument

            .SaveAs "D:\Percorso" & Format(i, "0000") _

                  , wdFormatPDF _

                  , AddToRecentFiles:=False

            .Saved = True

            .Close

          End With

        Next

      End With

    End With

ExitProc:

    Application.ScreenUpdating = True

    Set mm = Nothing

    Exit Sub

ErrH:

    MsgBox Err.Description

    Resume ExitProc

End Sub

La risposta è stata utile?

30+ persone hanno trovato utile questa risposta.
0 commenti

40 risposte aggiuntive

Ordina per: Più utili
Più utili Più recente Meno recente
  1. Anonimo
    2014-12-15T10:20:16+00:00

    Salve,

    Mi spiace chiedervi ancora spiegazioni su questo argomento, ma non conosceendo visual basic, non capisco proprio.

    Io volevo come gli altri salvare in sequenza i file da stampa unione in pdf mettendo il nome e il cognome nel file, ma non riesco con le vostre stringhe di codice...

    La risposta è stata utile?

    0 commenti
  2. Anonimo
    2014-11-24T16:48:51+00:00

    Buonasera,

    mi inserisco nella discussione perchè ho seguito le vostre istruzioni ma  essendo poco pratico ho ancora delle difficoltà....

    nel nome del file mi esce sempre scritto Desktop insieme al campo che io ho scelto. 

    Es:  Nome file pdf "DesktopRossi" mentre io avevo indicato come campo solo il cognome nella stringa di comando

    strFilename = .DataFields("cognome").Value

    altra cosa, oltre togliere la parola Desktop vorrei se possibile inserire i nomi che ho in un'altra colonna excel "nome", come devo modificare il comando?

    grazie

    La risposta è stata utile?

    0 commenti
  3. Anonimo
    2013-10-24T11:19:06+00:00

    Buongiorno Maurizio.

    Da ieri sera sto cercando di ottenere la stampa unione di N righe in N distinti pdf, ciascuno con proprio nome.

    Con quest'ultima versione aggiornata ho QUASI ottenuto quello che volevo. QUASI nel senso che non tutti i file sono stati salvati come Adobe Acrobat Document: alcuni infatti sono tipo File, altri File S, altri File C, altri ancora File L.

    E non capisco perché...

    La risposta è stata utile?

    0 commenti
  4. Anonimo
    2013-09-18T12:50:55+00:00

    Salve,

    ho provato il codice postato e mi è stato veramente utile.

    Avrei però la necessità, per motivi di efficienza, di creare i singoli pdf mediante una stampante virtuale come per esempio l'ottimo open source PDF creator.

    Saluti

    Tony

    La risposta è stata utile?

    0 commenti