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

    [Resolvido]Código para imprimir o relatório do registro atual (ajuda)

    OLDRIVG
    OLDRIVG
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 373
    Registrado : 20/07/2010

    [Resolvido]Código para imprimir o relatório do registro atual (ajuda) Empty [Resolvido]Código para imprimir o relatório do registro atual (ajuda)

    Mensagem  OLDRIVG Qua Out 03, 2018 12:21 pm

    Prezados, bom dia.

    Novamente me recorro aos senhores.

    Estou tentando utilizar o código DoCmd.OpenReport "RelatorioTeste", acViewPreview, , "IdSequencial = " & Me!IdSequencial para visualizar e imprimir o relatório do registro que estiver, no momento, sendo exibido na tela. O que ocorre é que quando clica no botão Visualizar Relatório, no formulário, é exibida uma caixa solicitando inserção de um valor de parâmetro. Há como eliminar esta solicitação ou estou fazendo alguma coisa errada no código?

    Em anexo segue uma cópia teste do BD onde se utiliza o código.

    Caso haja alguma outra forma de exibir um relatório do registro atual do formulário e sua impressão, sou grato a quem puder me ajudar.

    Desde já agradeço
    Anexos
    [Resolvido]Código para imprimir o relatório do registro atual (ajuda) AttachmentPROTOCOLO - teste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (213 Kb) Baixado 11 vez(es)
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3281
    Registrado : 21/04/2011

    [Resolvido]Código para imprimir o relatório do registro atual (ajuda) Empty Re: [Resolvido]Código para imprimir o relatório do registro atual (ajuda)

    Mensagem  Marcelo David Qua Out 03, 2018 12:45 pm

    Bom dia!
    Você está comparando valores texto como se fossem numéricos, o correto no seu caso é assim:

    DoCmd.OpenReport "RelatorioTeste", acViewPreview, , "IdSequencial = '" & Me!IdSequencial & "'"

    Apenas substitua o códico do botão "Visualizar relatório" para o código acima.


    .................................................................................
    Marcelo David | [Resolvido]Código para imprimir o relatório do registro atual (ajuda) LinkedIn_Icon.jpg.original LinkedIn
    https://www.freetool.dev
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 373
    Registrado : 20/07/2010

    [Resolvido]Código para imprimir o relatório do registro atual (ajuda) Empty Re: [Resolvido]Código para imprimir o relatório do registro atual (ajuda)

    Mensagem  OLDRIVG Qua Out 03, 2018 1:22 pm

    Bom dia, Marcelo David.

    Obrigado pela a atenção e ajuda. Funcionou legal.

    Agradecido
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3281
    Registrado : 21/04/2011

    [Resolvido]Código para imprimir o relatório do registro atual (ajuda) Empty Re: [Resolvido]Código para imprimir o relatório do registro atual (ajuda)

    Mensagem  Marcelo David Qua Out 03, 2018 1:28 pm

    O fórum está grato pelo retorno!


    .................................................................................
    Marcelo David | [Resolvido]Código para imprimir o relatório do registro atual (ajuda) LinkedIn_Icon.jpg.original LinkedIn
    https://www.freetool.dev

      Data/hora atual: Qua Abr 21, 2021 5:48 pm