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]Imprimir relatório aberto com um botão no formulário

    rdrck
    rdrck
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1011
    Registrado : 11/03/2014

    [Resolvido]Imprimir relatório aberto com um botão no formulário Empty [Resolvido]Imprimir relatório aberto com um botão no formulário

    Mensagem  rdrck 13/6/2014, 15:07

    Olá amigos,
    Segue aí mais uma dúvida, a qual dei uma pesquisada, mas não achei algo que me servisse.
    Pelo menu do BD o usuário pode escolher para visualizar/consultar algo, como, por exemplo, a relação de produtos.
    Ao clicar, abre o relatório (visualização de impressão) e coloquei um formulário pequeno perguntando se o usuário deseja imprimir o relatório ou apenas visualizá-lo.
    Se clicar no botão Visualizar, apenas fecha o form e pode navegar pelo relatório.
    Mas se quiser imprimir o relatório, coloquei o código para imprimir o relatório X:

    DoCmd.OpenReport "MeuRelatorio", acViewNormal
    DoCmd.Close

    O problema é que, dessa forma, terei que fazer um form para cada relatório.
    Então, o que eu queria era que, ao clicar no Imprimir, fosse feita a impressão do relatório aberto, para que usasse somente um form de impressão para todos os relatórios.
    Desde já agradeço a contribuição dos colegas.


    .................................................................................
    Meu Programa / OS:
    Access 2010 - Windows 10.
    rdrck
    rdrck
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1011
    Registrado : 11/03/2014

    [Resolvido]Imprimir relatório aberto com um botão no formulário Empty Re: [Resolvido]Imprimir relatório aberto com um botão no formulário

    Mensagem  rdrck 16/6/2014, 12:34

    Trazendo o tópico para cima.


    .................................................................................
    Meu Programa / OS:
    Access 2010 - Windows 10.
    rdrck
    rdrck
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1011
    Registrado : 11/03/2014

    [Resolvido]Imprimir relatório aberto com um botão no formulário Empty Re: [Resolvido]Imprimir relatório aberto com um botão no formulário

    Mensagem  rdrck 27/6/2014, 12:43

    E aí pessoal, será que tem jeito?


    .................................................................................
    Meu Programa / OS:
    Access 2010 - Windows 10.
    daniloreiis
    daniloreiis
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 338
    Registrado : 14/02/2011

    [Resolvido]Imprimir relatório aberto com um botão no formulário Empty Imprimir relatório aberto com um botão no formulário

    Mensagem  daniloreiis 27/6/2014, 13:44

    Uma ideia que talvez funcione pois não testei


    crie uma varivel global assim

    Global rpt_Meurelatorio As String

    Quando for chamar algum relatorio faça assim

    rpt_Meurelatorio = "nomedorelatorio"

    e no seu form que chama a impressão você faz assim

    Código:
    Private Sub Comando0_Click()
    MsgBox Módulo1.rpt_Meurelatorio
    DoCmd.OpenReport Módulo1.rpt_Meurelatorio, acViewNormal
    End Sub

    Private Sub Comando1_Click()
    MsgBox Módulo1.rpt_Meurelatorio
    DoCmd.OpenReport Módulo1.rpt_Meurelatorio, acViewPreview

    End Sub


    segue o projeto:

    http://www.4shared.com/rar/nQQeLMwGce/relatorios.html


    .................................................................................
    Att, Danilo Reis
    -------------------------------------------------------------------------------------------------------------------------------------------------

    Se alguém não quiser trabalhar, não coma também.
    2 Tessalonicenses 3:10
    rdrck
    rdrck
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1011
    Registrado : 11/03/2014

    [Resolvido]Imprimir relatório aberto com um botão no formulário Empty Re: [Resolvido]Imprimir relatório aberto com um botão no formulário

    Mensagem  rdrck 27/6/2014, 14:03

    Olá Danilo,
    Desde já obrigado pelo retorno.
    Depois vou testar e retorno com o resultado.


    .................................................................................
    Meu Programa / OS:
    Access 2010 - Windows 10.
    rdrck
    rdrck
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1011
    Registrado : 11/03/2014

    [Resolvido]Imprimir relatório aberto com um botão no formulário Empty Re: [Resolvido]Imprimir relatório aberto com um botão no formulário

    Mensagem  rdrck 27/6/2014, 15:19

    Meu amigo, é isso mesmo.
    Deu certo.
    Obrigado.


    .................................................................................
    Meu Programa / OS:
    Access 2010 - Windows 10.

    Conteúdo patrocinado


    [Resolvido]Imprimir relatório aberto com um botão no formulário Empty Re: [Resolvido]Imprimir relatório aberto com um botão no formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/4/2024, 10:18