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 Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Ativar ou desativar botão conforme dados em um campo

    Compartilhe

    Marceff@bol.com.br
    Novato
    Novato

    Respeito às Regras 100%

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

    [Resolvido]Ativar ou desativar botão conforme dados em um campo

    Mensagem  Marceff@bol.com.br em Seg 21 Dez 2015, 01:26

    Boa Noite!!!

    Estou usando um código, no evento após atualizar de uma caixa de combinação, a intenção é que se no meu campo chamado arquivo contiver ou não dados ocorra o seguinte:
    1. Se o campo contém dados então:
       Desativa o botão localizar imagem;
       Ativa o botão excluir registro;
       Ativa o botão excluir imagem.

    2. Se o campo não contém dados então:
       Desativa o botão excluir imagem;
       Ativa o botão localizar imagem.

    O que ocorre é que em alguns registros o campo não contém dados e simplesmente ocorre o evento 1, já em outros também não contém dados nos registros e ocorre o evento 2 que é o que eu quero, isso esta me deixando intrigado, pois o campo arquivo, registra na tabela os dados, quando eu excluo os dados desse campo deve ocorrer o evento 2, e em alguns ocorre em outros não.

    Alguém poderia me ajudar e dizer o que eu estou errando, segue abaixo o código que uso.

    If IsNull(Me!Arquivo.Value) Then
        'Se o campo não contiver dados habilita o botão localizar png e desabilita o excluir
               Me.BtExcluirPNG.Enabled = False
               Me.CmdLocPNG.Enabled = True
           Else
          'Se o campo contiver dados desabilita o botão
               Me.CmdLocPNG.Enabled = False
          'Habilita o comando excluir
               Me.btExcluir.Enabled = True
               Me.BtExcluirPNG.Enabled = True
           End If

    Desde já agradeço pela ajuda, a quem puder ajudar

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: [Resolvido]Ativar ou desativar botão conforme dados em um campo

    Mensagem  JPaulo em Seg 21 Dez 2015, 11:41

    Ola;

    Teste desta forma e retorne;

    Código:
    Private Sub SuaCombo_AfterUpdate()
    If IsNull(Me!Arquivo.Value) Or Me!Arquivo.Value = "" Then
        'Se o campo não contiver dados habilita o botão localizar png e desabilita o excluir
              Me.btExcluir.Enabled = False
              Me.BtExcluirPNG.Enabled = False
              Me.CmdLocPNG.Enabled = True
              Exit Sub
          Else
          'Se o campo contiver dados desabilita o botão
              Me.CmdLocPNG.Enabled = False
          'Habilita o comando excluir
              Me.btExcluir.Enabled = True
              Me.BtExcluirPNG.Enabled = True
              Exit Sub
          End If
    End Sub


    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    Marceff@bol.com.br
    Novato
    Novato

    Respeito às Regras 100%

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

    Re: [Resolvido]Ativar ou desativar botão conforme dados em um campo

    Mensagem  Marceff@bol.com.br em Seg 21 Dez 2015, 18:44

    Boa Tarde!!!
    JPaulo

    Cara, eu espero um dia chegar no mínimo a 10% de seu conhecimento, assim como o de muitos aqui do fórum e de tantos outros por ai, são pessoas extremamente inteligentes e capazes de compartilhar seu conhecimento, sei que com muito estudo eu chego lá. Muito obrigado ficou 1000, exatamente como eu precisava, abraços e feliz festas de fim de ano, a você e a todos.

    Att. Marcelino

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: [Resolvido]Ativar ou desativar botão conforme dados em um campo

    Mensagem  JPaulo em Seg 21 Dez 2015, 18:52

    Fico feliz.

    Obrigado pelo retorno o forum agradece.

    [Você precisa estar registrado e conectado para ver este link.]


    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

      Data/hora atual: Sab 03 Dez 2016, 02:27