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]Impedir que formulário de critérios seja maximizado se o relatório não contiver dados ...

    Compartilhe
    avatar
    augustopimenta
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 112
    Registrado : 19/03/2012

    [Resolvido]Impedir que formulário de critérios seja maximizado se o relatório não contiver dados ...

    Mensagem  augustopimenta em Qui 07 Ago 2014, 02:24

    Olá pessoal..
    Tenho um relatório que é impresso de acordo com alguns critérios inseridos num formulário...
    Coloquei o comando docmd.maximize na chamada do relatório para que ele abra já maximizado ...
    No evento "Se nenhum dado" do relatório coloquei o seguinte comando:
    msgbox "não há dados para este período."
    cancel = true

    O problema é que quando não há dados para imprimir, o access está maximizando o formulário de critérios... Isso causa um incômodo muito grande, pois o formulário é pequeno e fica tomando a tela toda de maneira desproporcional..
    Como faço para que o formulário não seja maximizado ???
    Alguma dica..
    Desde já agradeço ....
    avatar
    Avelino Sampaio
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3399
    Registrado : 04/04/2010

    Re: [Resolvido]Impedir que formulário de critérios seja maximizado se o relatório não contiver dados ...

    Mensagem  Avelino Sampaio em Qui 07 Ago 2014, 10:26

    Olá!

    O cancelamento do relatório causa a geração do erro 2501 no evento que o chamou.  Basta então tratarmos o erro.  exemplo:

    Private Sub btImprimir_Click()
    On Error GoTo TrataErro
    DoCmd.OpenReport "NomeRelatório", acViewPreview
    Sair:
    DoCmd.Maximize
    TrataErro:
    End Sub


    Nota:  Passe a propriedade "estilo de borda" do formulário para "Diálogo"

    Sucesso!
    avatar
    augustopimenta
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 112
    Registrado : 19/03/2012

    Re: [Resolvido]Impedir que formulário de critérios seja maximizado se o relatório não contiver dados ...

    Mensagem  augustopimenta em Qui 07 Ago 2014, 14:04

    Obrigado mais uma vez Avelino ...
    Funcionou perfeitamente ....
    Como tenho pouca familiaridade com o assunto, caio nessas armadilhas algumas vezes.. rsrs
    Simples, direto e funcional ...

      Data/hora atual: Ter 24 Out 2017, 08:26