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]Ajuda Formulário!

    jparpinfo
    jparpinfo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 45
    Registrado : 27/06/2014

    [Resolvido]Ajuda Formulário! Empty [Resolvido]Ajuda Formulário!

    Mensagem  jparpinfo 11/9/2015, 13:17

    Bom dia,
    Como faço para não deixar o formulário fechar se tiver dados na caixa de listagem?.
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 980
    Registrado : 09/11/2012

    [Resolvido]Ajuda Formulário! Empty Re: [Resolvido]Ajuda Formulário!

    Mensagem  =>Nois 11/9/2015, 13:24

    faz um dcount na tabela fazendo referencia ao filtro dessa lista



    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    jparpinfo
    jparpinfo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 45
    Registrado : 27/06/2014

    [Resolvido]Ajuda Formulário! Empty Ajuda

    Mensagem  jparpinfo 11/9/2015, 13:47

    Amigo desculpa mas teria algum exemplo?
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 980
    Registrado : 09/11/2012

    [Resolvido]Ajuda Formulário! Empty Re: [Resolvido]Ajuda Formulário!

    Mensagem  =>Nois 11/9/2015, 17:47

    seria algo assim, não testei


    em um botão ou no evento ao fechar


    If Nz(DCount("[seucodigo]", "suatabela", "[seucodigo] = '" & Me!seucodigoref & "'"), 0) >= 1 Then

    msgbox "proibido fechar"

    else

    docmd.close

    end if


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    jparpinfo
    jparpinfo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 45
    Registrado : 27/06/2014

    [Resolvido]Ajuda Formulário! Empty Ajuda

    Mensagem  jparpinfo 11/9/2015, 20:11

    Amigo noisnafita,
    Perfeito, muito obrigado pela ajuda funcionou 1000%

    Conteúdo patrocinado


    [Resolvido]Ajuda Formulário! Empty Re: [Resolvido]Ajuda Formulário!

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 10:10