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

    Botão imprimir subformulário

    avatar
    Stalloni
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 20
    Registrado : 15/05/2012

    Botão imprimir subformulário Empty Botão imprimir subformulário

    Mensagem  Stalloni 1/10/2024, 17:42

    Olá pessoal!
    Mais uma peço ajuda de vocês

    Tenho um subformulário que exibe alguns relatórios através de uma instrução Select Case de um grupo de opções, estou tentando criar um botão "imprimir" no formulário, que imprima o relatório selecionado no subformulário, como deve ser essa instrução.

    desde já agradeço
    avatar
    Anslu
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 123
    Registrado : 11/01/2018

    Botão imprimir subformulário Empty Re: Botão imprimir subformulário

    Mensagem  Anslu 2/10/2024, 14:53

    Bom dia!

       Tenta assim, ao clicar do botão Imprimir.

    Private Sub imprimir_Click()

    On Error GoTo Imprimir_Err

       DoCmd.OpenReport "nome do seu relatório", acViewNormal, "", ""
       
    Imprimir_Exit:
        Exit Sub

    Imprimir_Err:
       MsgBox Error$
       Resume Imprimir_Exit

       
    End Sub
    avatar
    Stalloni
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 20
    Registrado : 15/05/2012

    Botão imprimir subformulário Empty Botão imprimir subformulério

    Mensagem  Stalloni 2/10/2024, 17:57

    Olá Anslu
    Obrigado por responder
    Não funcionou!

    Eu estava tentando com "PrintOut" e algumas variações

    Private Sub Comando0_Click()

       DoCmd.PrintOut

    End Sub

    Mas assim, imprime o formulário todo, e no caso preciso que imprima somente o subformulário que está dentro do formulário.

    Conteúdo patrocinado


    Botão imprimir subformulário Empty Re: Botão imprimir subformulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/10/2024, 22:47