×
Ir ao conteúdo
  • Cadastre-se

Word Impressão vba para mala direta - Concatenar


Posts recomendados

Pessoal,

 

Estou tentando imprimir automaticamente a mala direta em PDF e dar o nome do arquivo com 2 informações de dentro do word.

Alguém saberia como fazer?

 

Preciso que nesse trecho, conste 2 informações (Exemplo: Nome + Ticket) - nomeArquivo = ActiveDocument.MailMerge.DataSource.DataFields("Nome").Value

 

Código completo:

 

Sub SalvarComoPDF()



Dim qtde As Integer
Dim nomeArquivo As String
Dim registro As Integer



'Set Mail Merge in the first register
ActiveDocument.MailMerge.DataSource.ActiveRecord = wdFirstRecord



'Mail Merge Count
qtde = ActiveDocument.MailMerge.DataSource.RecordCount
'arquivo = ActiveDocument.MailMerge.DataSource.FieldNames(1).Name



'For to exportToPDF all registers
For registro = 1 To qtde



nomeArquivo = ActiveDocument.MailMerge.DataSource.DataFields("Nome").Value



ActiveDocument.ExportAsFixedFormat OutputFileName:= _

    "C:\Users\rosel\Desktop\Nome excel\Imp\" & nomeArquivo & ".pdf" _
    , ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _
    wdExportOptimizeForPrint, Range:=wdExportAllDocument, From:=1, To:=1, _
    Item:=wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _
    CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
    BitmapMissingFonts:=True, UseISO19005_1:=False

    ActiveDocument.MailMerge.DataSource.ActiveRecord = wdNextRecord

    Next registro

    End

End Sub


        

Link para o comentário
Compartilhar em outros sites

Bem vinda ao fórum, @Roseli!

 

Mas "Ticket" também é um campo de mala direta, tal como "Nome" é?

 

Se sim, bastaria você inserir mais uma linha naquele trecho para concatenar as 2 informações:

 

...
...
nomeArquivo = ActiveDocument.MailMerge.DataSource.DataFields("Nome").Value
'Acrescentar esta linha:
nomeArquivo = nomeArquivo & ActiveDocument.MailMerge.DataSource.DataFields("Ticket").Value
...
...

 

Se não for isso, anexe seu arquivo aqui no fórum zipando-o primeiro.

Link para o comentário
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisa ser um usuário para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

Como ganhar dinheiro montando computadores!

MINICURSO GRÁTIS!

Como ganhar dinheiro montando computadores!

CLIQUE AQUI E INSCREVA-SE AGORA MESMO!