MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Converter vários PDFs num único via vba

    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Converter vários PDFs num único via vba Empty [Resolvido]Converter vários PDFs num único via vba

    Mensagem  zcarloslopes 13/12/2019, 11:32

    Bom dia,

    Mais uma ajudinha por favor...

    Uso este código para converter 2 PDFs em 1:
    Código:
       Dim blRet As Boolean
        Dim sMaster As String
        Dim sChild As String
        sMaster = "N:\Pasta\pdf1.pdf"
        sChild =  "N:\Pasta\pdf1.pdf"
        blRet = MergePDFDocuments(sMaster, sChild)

    O que pretendo é transformar sChild numa Array com diversos PDFs.

    Já tenho a Array criada mas não estou a conseguir que funcione.

    Alguma ideia?

    Obrigado


    Última edição por zcarloslopes em 16/12/2019, 09:00, editado 1 vez(es)
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Converter vários PDFs num único via vba Empty Re: [Resolvido]Converter vários PDFs num único via vba

    Mensagem  DamascenoJr. 14/12/2019, 02:08

    Alguma ideia?
    Sim, use laço de repetição.

    Código:
    Dim i as integer

    For i = LBound(ArrayDePDFs) to UBound(ArrayDePDFs)
    'Aqui o código passa em cada pdf da array
    'Exemplo
    'ArrayDePDFs(i)
    'Basta usar essa passada de pdf em pdf para fazer o que deseja
    Next i


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    zcarloslopes
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 393
    Registrado : 28/10/2010

    [Resolvido]Converter vários PDFs num único via vba Empty Re: [Resolvido]Converter vários PDFs num único via vba

    Mensagem  zcarloslopes 16/12/2019, 08:59

    Bom dia,

    Muito obrigado Ivan.

    Perfeito!
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Converter vários PDFs num único via vba Empty Re: [Resolvido]Converter vários PDFs num único via vba

    Mensagem  DamascenoJr. 17/12/2019, 00:52

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    Conteúdo patrocinado


    [Resolvido]Converter vários PDFs num único via vba Empty Re: [Resolvido]Converter vários PDFs num único via vba

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 25/11/2024, 07:06