MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas, Exemplos e Codigos VBA

    [Resolvido]Campo não pode ficar vazio

    Compartilhe

    Nardao
    Intermediário
    Intermediário

    Localização:
    Mensagens: 102
    Registrado: 06/12/2010

    Campo não pode ficar vazio

    Mensagem  Nardao em 10/2/2011, 10:42

    Tenho um formulario de pedidos que necessitava que o campo com o "valor de entrada" que o cliente estaria pagando à loja não pode ficar vazio, pois a venda só se efetuaria com esta entrada e tem que ser no minimo 40% de entrada.
    Quanto aos 40% eu já resolvi, criando um evento que ao receber o foco ele necessariamente tem que entrar com no minimo 40% do valor do pedido. Acontece que se o operador do sistema em vez de usar o TAB do teclado para passar pelos campos, for com o mouse, ele pularia este campo, assim sendo sem receber o foco o campo ficaria vazio. Eu precisava que se fosse salvar o registro e este campo estivesse vazio, o access não deixasse e alertasse o usuario para digitar o valor neste campo.
    Desde já, muito obrigado a todos deste forum (genial)....

    JUNGLI
    Developer
    Developer

    Localização:
    Mensagens: 388
    Registrado: 07/05/2010

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  JUNGLI em 10/2/2011, 10:58

    Tente assim:

    no evento do botão salvar por exemplo,

    If [valor de entrada] Is Null or [valor de entrada]="" Then
    msgbox "você tem que preencher o campo [valor de entrada]"
    Else
    DoCmd.RunCommand acCmdSaveRecord
    End If

    Nardao
    Intermediário
    Intermediário

    Localização:
    Mensagens: 102
    Registrado: 06/12/2010

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  Nardao em 10/2/2011, 11:06

    Estou na dúvida onde colocar este codigo de evento que você sugeriu. É que criei um botão de salvar pelo assistente e ele cria uma macro incorporada com a ação "ao clicar" para salvar o registro. Eu retiro esta macro e coloco o codigo, ou coloco o código em outro local (por ex: ao sair). Não vai dar problema a macro e o codigo juntos????

    JPaulo
    Moderador
    Moderador

    Localização:
    Mensagens: 3613
    Registrado: 04/11/2009

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  JPaulo em 10/2/2011, 12:27

    Existem mil maneiras de fazer nestum;

    Delete a macro incorporada, pressione os 3 pontinhos do lado direito no evento ao saír desse campo, abra o VBA e cole isto;

    Private Sub SeuCampo_Exit(Cancel As Integer)
    If IsNull(Me.ActiveControl) Then
    DoCmd.CancelEvent
    MsgBox "Campo Obrigatório...", vbCritical
    End If
    End Sub




    Última edição por JPaulo em 10/2/2011, 14:02, editado 1 vez(es)


    .................................................................................
    Sucesso e abraço
    Success and hug

    A imaginação é inútil sem a aplicação de conhecimentos.
    Imagination is fruitless without applying knowledge.

    JUNGLI
    Developer
    Developer

    Localização:
    Mensagens: 388
    Registrado: 07/05/2010

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  JUNGLI em 10/2/2011, 12:56

    Boa mestre JPaulo...

    Nardao
    Intermediário
    Intermediário

    Localização:
    Mensagens: 102
    Registrado: 06/12/2010

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  Nardao em 12/2/2011, 00:07

    Agradeço a todos pela atenção. O exemplo da Jungli não deu certo: apresenta mensagem de erro.
    Já o exemplo do JPaulo funcionou beleza, porém existe um probleminha: Se o usuario for dando TAB pelos campos, é lógico que o campo supra citado receberá o foco e assim que o usuario sair dele, se não digitar nada vai dar a mensagem. Agora se o usuário pular este campo (por exemplo ir clicando com o mouse pelos campos) e não digitar nada ao avançar para o próximo registro o access salva mesmo sem o preenchimento deste campo. O que fazer?????

    Obrigadão pela ajuda e desculpe a demora em responder. Estive trabalhando muito....

    JUNGLI
    Developer
    Developer

    Localização:
    Mensagens: 388
    Registrado: 07/05/2010

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  JUNGLI em 12/2/2011, 11:36

    nardao revi o código que passei antes e realmente tinha um erro nele, me desculpe!

    estou disponibilizando um exemplo aqui espero que dê certo!

    a propósito jungli é o safado de da foto ok! Laughing Very Happy alien


    Nardao
    Intermediário
    Intermediário

    Localização:
    Mensagens: 102
    Registrado: 06/12/2010

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  Nardao em 12/2/2011, 20:46

    Mais uma vez obrigado Jungli.
    Seu exemplo está quase perfeito. Pois se eu deixar um campo em branco e ficar clicando no botão salvar, ele não sai dali até que seja digitado um valor nos campos em branco. Porém se o usuario for dando TAB pelos campos, ao acabar os campos (tabulados) ele vai para outro registro e sendo assim salva aquele registro com os campos em branco (vazio). o seu exemplo aconteceu o inverso do JPaulo.

    vieirasoft
    Moderador Global
    Moderador Global

    Localização:
    Mensagens: 6986
    Registrado: 11/05/2010

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  vieirasoft em 12/2/2011, 21:15

    Nardão

    para quê complicar o simples. Veja aqui o exemplo que o Jungli fez e que eu alterei. Não deixa avançar para outro registo:

    Anexos
    nardao.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (57 Kb) Baixado 33 vez(es)

    Nardao
    Intermediário
    Intermediário

    Localização:
    Mensagens: 102
    Registrado: 06/12/2010

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  Nardao em 12/2/2011, 22:26

    Maravilha Vieira!!!! Agora ficou show de bola.... Era exatamente isso que precisava.
    Obrigadão....

    vieirasoft
    Moderador Global
    Moderador Global

    Localização:
    Mensagens: 6986
    Registrado: 11/05/2010

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  vieirasoft em 12/2/2011, 22:29

    Obrigado pelo retorno e bom trabalho

    JUNGLI
    Developer
    Developer

    Localização:
    Mensagens: 388
    Registrado: 07/05/2010

    Re: [Resolvido]Campo não pode ficar vazio

    Mensagem  JUNGLI em 14/2/2011, 11:21

    Obrigado mais uma vez mestre!

      Data/hora atual: 21/5/2012, 13:02