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]Validação Formulário

    avatar
    lucas.marques
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 27/10/2011

    [Resolvido]Validação Formulário Empty Validação Formulário

    Mensagem  lucas.marques 13/11/2011, 17:05

    Boa tarde,

    Antes de postar pesquisei bastante no fórum mas não estou conseguindo localizar exatamente o que preciso. Tenho um formulário onde preciso validar alguns campos, até aí tudo bem, estou conseguindo validar se o campo está preenchido ou não com o evento Form_AfterUpdate, no botão Salvar (com a ajuda do fórum) criei um controle que não permite salvar sem que o campo esteja preenchido. O problema é que se eu clico no campo Próximo Registro ou no campo Registro Anterior o formulário é salvo normalmente e as informações gravadas na tabela, sem a obrigatoriedade do campo estar preenchido.
    Agradeço desde já possíveis soluções.
    avatar
    Convidado
    Convidado


    [Resolvido]Validação Formulário Empty Re: [Resolvido]Validação Formulário

    Mensagem  Convidado 13/11/2011, 23:55

    Ao inves de utilizar os comandos padrao do access, os desabilite e aplique botoes com os comandos em vba, e no clique do botao a verificacao que desejar... no forum encontrara exemplos de forms com os botoes de ultimo, primeiro, proximo e anterior.. juntamenta com o vba da cada comando, os comandos que fazem a checagem de validacao...

    Ex.

    If isnull (caixatexto) = true or me.caixatexto = "" then
    Msgbox "sua mensagem",vbinformation, "atencao"
    Exit sub
    Else
    DoCmd.GoToRecord , , acNewRec
    End if
    avatar
    lucas.marques
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 27/10/2011

    [Resolvido]Validação Formulário Empty Validação Formulário

    Mensagem  lucas.marques 14/11/2011, 16:06

    Boa tarde,

    Obrigado pelo retorno, mas como tinha falado já pesquisei bastante no fórum (validação formulário, validar, etc), já peguei banco de exemplos, porém não estou encontrando o que preciso. Você poderia me ajudar ou indicar um tópico onde tratam desse assunto? desde já agradeço
    avatar
    Convidado
    Convidado


    [Resolvido]Validação Formulário Empty Re: [Resolvido]Validação Formulário

    Mensagem  Convidado 14/11/2011, 16:42

    Lucas, o codigo acima faz exatamente isto, crie um botao e no evento ao clique do esmo aplique o codigo....o codigo que postei faz alusao ao comando novo... para os outos substitua a larte do newrec para lastrec, nextrec... veja no F1 do access sobre o comando DoCmd.GoToRecord que encontrara as sintaxes correta... este comando acima creio que resolvera o teu problema

    Cuprimentos
    avatar
    lucas.marques
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 27/10/2011

    [Resolvido]Validação Formulário Empty Validação Formulário

    Mensagem  lucas.marques 16/11/2011, 16:52

    Blz estamos quase lá...

    Com a sua ajuda estou conseguindo realizar a validação.
    Só estou com um problema, quando estou no primeiro registro e clico no botão Voltar (DoCmd.GoToRecord , , acPrevious) dá um erro pois já está no primeiro registro, como não conheço quase nada de VBA não estou conseguindo realizar a validação para que se ele já estiver no primeiro campo ele não dê esse erro.
    Agradeço a ajuda.
    avatar
    Convidado
    Convidado


    [Resolvido]Validação Formulário Empty Re: [Resolvido]Validação Formulário

    Mensagem  Convidado 19/11/2011, 00:39

    NO repositorio de codigos vba crei, tem um topico sobre tratamento de erros, neste cao vai aplicar um tratamento que ao ocorrer o erro vo trata apenas o erro... e algo assim..



    On error goto trataero

    If isnull (caixatexto) = true or me.caixatexto = "" then
    Msgbox "sua mensagem",vbinformation, "atencao"
    Exit sub
    Else
    DoCmd.GoToRecord , , acNewRec
    End if

    Trataerro:
    If error xxxxx then
    Msgbox blablabla
    Exit sub
    End if

    Pesquise o codigo de tratamento no topico que indiquei, veras a sintaxe correta



    Cumprimentos
    avatar
    lucas.marques
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 27/10/2011

    [Resolvido]Validação Formulário Empty Validação Formulário

    Mensagem  lucas.marques 25/11/2011, 11:12

    Blz, muito obrigado pela ajuda.
    avatar
    lucas.marques
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 27/10/2011

    [Resolvido]Validação Formulário Empty Validação Formulário

    Mensagem  lucas.marques 25/11/2011, 11:14

    .
    avatar
    Convidado
    Convidado


    [Resolvido]Validação Formulário Empty Re: [Resolvido]Validação Formulário

    Mensagem  Convidado 25/11/2011, 19:58

    Sua última mensagem esta em branco...

    Cumprimentos.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Validação Formulário Empty Re: [Resolvido]Validação Formulário

    Mensagem  vieirasoft 20/1/2012, 10:03

    Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.

    Conteúdo patrocinado


    [Resolvido]Validação Formulário Empty Re: [Resolvido]Validação Formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 17/5/2024, 04:47