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 : 653
    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


    .................................................................................
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Sempre tente entender o código, não somente copie e cole.
    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 : 653
    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.


    .................................................................................
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Sempre tente entender o código, não somente copie e cole.

    Conteúdo patrocinado

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

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/7/2019, 13:39