MaximoAccess

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

Obrigado

Administração do MaximoAccess

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


    [Resolvido]Codigo VBA

    avatar
    CPimenta
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 05/01/2017

    [Resolvido]Codigo VBA Empty [Resolvido]Codigo VBA

    Mensagem  CPimenta em 24/6/2019, 14:55

    Boa tarde

    Tenho este código inserido num botão de comando, mas o que acontece é quando mando imprimir outro mapa ele não assume qual o mapa e a data, será que tenho que alterar alguma coisa no código? Alem deste Mapa "Registo no Recobro UCA", tambem é Registo no "Recobro UCA-Pernoita" , solicito a vossa ajuda.

    Private Sub BtnImpRelPDF_Click()
    Dim strArquivo As String
    Dim strLocal As String
    strArquivo = " Registo Recobro" & ".PDF"
    strLocal = CurrentProject.Path & "\TESTE\" & strArquivo
    DoCmd.OutputTo acOutputReport, "Rel_Registo_Recobro", acFormatPDF, strLocal
    End Sub
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Codigo VBA Empty Re: [Resolvido]Codigo VBA

    Mensagem  IvanJr. em 24/6/2019, 15:20

    O código postado sempre salva os arquivos com o mesmo nome. Gere nomes diferentes.


    Código:
    Private Sub BtnImpRelPDF_Click()
    Dim strArquivo As String
    Dim strLocal As String
    strArquivo = " Registo Recobro" & second(now) & ".PDF"
    strLocal = CurrentProject.Path & "\TESTE\" & strArquivo
    DoCmd.OutputTo acOutputReport, "Rel_Registo_Recobro", acFormatPDF, strLocal
    End Sub


    .................................................................................
    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
    CPimenta
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 05/01/2017

    [Resolvido]Codigo VBA Empty Re: [Resolvido]Codigo VBA

    Mensagem  CPimenta em 24/6/2019, 15:33

    Boa tarde

    Valeu amigo pela dica, ficou beleza.

    Um abraço
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Codigo VBA Empty Re: [Resolvido]Codigo VBA

    Mensagem  IvanJr. em 24/6/2019, 16:05

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    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]Codigo VBA Empty Re: [Resolvido]Codigo VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 16/9/2019, 08:01