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

    Abrir e Imprimir registro específico em um Relatório

    avatar
    wlademir.pacheco
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 12/03/2017

    Abrir e Imprimir registro específico em um Relatório Empty Abrir e Imprimir registro específico em um Relatório

    Mensagem  wlademir.pacheco em 12/3/2017, 23:16

    Olá pessoal,
    Preciso de uma ajuda... talvez seja até repetido...não sei. Mas como sou iniciante não consegui resolver com os tópicos já postados:

    Criei um relatório, configurado para um registro por página, com dados inseridos pelo meu formulário.
    Criei também um formulário de pesquisa dos registros cadastrados em uma caixa de listagem

    Ocorre que desejo efetuar a pesquisa na caixa de listagem e selecionar esse registro fazendo com que o botão abra exatamente o registro selecionado e imprima somente esta pagina.

    Por favor, quem puder me ajude.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7615
    Registrado : 05/11/2009

    Abrir e Imprimir registro específico em um Relatório Empty Re: Abrir e Imprimir registro específico em um Relatório

    Mensagem  Alexandre Neves em 13/3/2017, 00:37

    Boa noite, e bem-vindo ao fórum
    Retirado do tema https://www.maximoaccess.com/t3538-resolvidoimprimir-registro-atual (mensagem 32)
    Senhores, bom dia!
    Usei o código citado anteriormente:
    DoCmd.OpenReport "NomeDoSeuRelatório", acViewPreview, "", "[Código]=[forms]![NomeDoSeuFormulário]![Código]", acNormal.
    Onde, nos campos, "NomeDoSeuRelatorio", [Código] e [NomeDoSeuFormulário] substituí-os pelos respectivos nomes do relatório, do campo onde se encontra o código do formulário (dentro do próprio formulário) e pelo nome do formulário.
    Gostaria de relatar, também, que deu certo para o meu caso, que é um formulário de saída para mercadorias, onde usei sub-formulário e sub-relatório.
    Ressaltando, também, que antes coloquei:
    Private Sub NomedoBotãoqueExecutaaAçãodeVisualizaraImpressão_Click()
    e, após o código acima, usei:
    End Sub


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    andison
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 19/03/2017

    Abrir e Imprimir registro específico em um Relatório Empty Re: Abrir e Imprimir registro específico em um Relatório

    Mensagem  andison em 28/3/2017, 03:01

    Muito obrigado Alexandre Neves,

    Usei aqui em meu Banco de Dados e funcionou perfeitamente.

    Parabéns.

    Abraço.

    cheers
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3913
    Registrado : 14/08/2013

    Abrir e Imprimir registro específico em um Relatório Empty Re: Abrir e Imprimir registro específico em um Relatório

    Mensagem  FabioPaes em 11/1/2018, 13:41

    Se a dúvida foi Solucionada, por favor marque o Tópico como resolvido! Assim todos saberão a solução!!!

    Veja como fazer: https://www.maximoaccess.com/t860-resolucao-de-topicos


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!

      Data/hora atual: 27/5/2020, 02:53