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]Bloquear e desbloquear atraves do grupo de opção

    danilo da siva
    danilo da siva
    danilo da siva
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 15/10/2011
    • Mensagem nº1

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Blquear e desbloquear atraves do grupo de opção

    Mensagem  danilo da siva 21/4/2012, 16:42

    Boa tarde a todos tenho um formulario de clientes com (Fisico e Juridico)
    Gostaria de clicar na opção fisico desabitasse o campo juridico e cnpj e quando clicar na juridico desabilitar fisico e cpf.

    Estou enviando meu exemplo. Por favor se puderem me ajudar.

    Grato segue o exemplo:


    .................................................................................
    Pensar nunca é insano.Pensar sozinho é humano.Pensar o pensamento de alguém é aprendizagem.
    O que não deu certo pode ser só uma etapa de aprendizagem pro que ainda está por vir.
    • Ir para o topo
    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº2

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Convidad 21/4/2012, 17:00


    Se tem um Grupo-de-Opção com duas opções, e elas tiverem o valor 1 e 2, basta colocar um código no evento ApósAtualizar do controle de opção:


    Private Sub NomeGrupo_AfterUpdate()
       If Me.NomeGrupo = 1  Then  'físico
          Me.CampoJuridico.Enabled = False
          Me.CampoCnpj.Enabled = False
          Me.CampoFisico.Enabled = True
          Me.CampoCpf.Enabled = True
       ElseIf Me.NomeGrupo = 2 Then  'jurídico
          Me.CampoJuridico.Enabled = True
          Me.CampoCnpj.Enabled = True
          Me.CampoFisico.Enabled = False
          Me.CampoCpf.Enabled = False
       End If
    End Sub

    Também pode usar Locked (Bloqueado) em vez de Enabled (Habilitado),
    invertendo, então, o True e o False.
    • Ir para o topo
    danilo da siva
    danilo da siva
    danilo da siva
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 15/10/2011
    • Mensagem nº3

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  danilo da siva 21/4/2012, 17:26

    Olá obrigado pela resposta,
    Mas não entendi o que diz respeito ao valor 1 e valor 2...poderia me explicar.


    .................................................................................
    Pensar nunca é insano.Pensar sozinho é humano.Pensar o pensamento de alguém é aprendizagem.
    O que não deu certo pode ser só uma etapa de aprendizagem pro que ainda está por vir.
    • Ir para o topo
    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº4

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Convidad 21/4/2012, 18:12


    Aí onde você clica para definir se é físico ou jurídico, não é um controle do tipo Grupo-de-opções com botões-de-seleção ou caixas-de-seleção dentro dele?

    Ou são dois controles botão-de-opção ou caixa-de-seleção fora de um controle Grupo?

    Se for um Grupo, cada controle dentro dele recebe um valor , ou seja, "dentro deste grupo de opções eu escolho a de valor X". Você define os valores.

    Seja qual for o caso, é só adaptar.
    • Ir para o topo
    danilo da siva
    danilo da siva
    danilo da siva
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 15/10/2011
    • Mensagem nº5

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  danilo da siva 21/4/2012, 18:32

    Então eu fiz conforme sua orientação mas parece que ñão acontece nada...quando a opção fica desabilitada, ela fica transparente? porque aqui aparentemente não mudou nada.

    Poderia me ajudar?


    .................................................................................
    Pensar nunca é insano.Pensar sozinho é humano.Pensar o pensamento de alguém é aprendizagem.
    O que não deu certo pode ser só uma etapa de aprendizagem pro que ainda está por vir.
    • Ir para o topo
    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº6

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Convidad 21/4/2012, 18:50


    Bem, você não esclareceu que tipo de controle está usando, estão não sei por onde ir...
    • Ir para o topo
    danilo da siva
    danilo da siva
    danilo da siva
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 15/10/2011
    • Mensagem nº7

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  danilo da siva 21/4/2012, 18:58

    Deixe-me tentar denovo.

    Estou usando uma caixa de seleção e tentei fazer todos os procedimentos que mencionei....



    .................................................................................
    Pensar nunca é insano.Pensar sozinho é humano.Pensar o pensamento de alguém é aprendizagem.
    O que não deu certo pode ser só uma etapa de aprendizagem pro que ainda está por vir.
    • Ir para o topo
    Leandro
    Leandro
    Leandro
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1601
    Registrado : 12/11/2009
    • Mensagem nº8

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Leandro 21/4/2012, 19:05

    Danilo, dê uma olhada.


    http://www.4shared.com/zip/UQgZOISv/teste.html



    Notei que você não criou as caixas de opção com o grupo de opções, esse grupo é um botão na barra de ferramentas que tem "xyz", procure, sem ele, eu pelo menos, não sei como altrernar os valores do quadro.



    Até mais

    • Ir para o topo
    danilo da siva
    danilo da siva
    danilo da siva
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 15/10/2011
    • Mensagem nº9

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  danilo da siva 21/4/2012, 19:41

    oi Leandro obrigado pela resposta
    não estou conseguindo acessar o seu link. poderia mandar para o meu email por favor danilo.silva.dna@hotmail.com


    .................................................................................
    Pensar nunca é insano.Pensar sozinho é humano.Pensar o pensamento de alguém é aprendizagem.
    O que não deu certo pode ser só uma etapa de aprendizagem pro que ainda está por vir.
    • Ir para o topo
    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº10

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Convidad 21/4/2012, 20:03


    Danilo, é simples:

    Insira um controle Grupo de Opções no seu form;

    Insira 2 controles Caixa de Seleção dentro do Grupo;

    Na propriedade Valor de Opção de uma das Caixas, defina 1, e na outra 2.
    • Ir para o topo
    danilo da siva
    danilo da siva
    danilo da siva
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 15/10/2011
    • Mensagem nº11

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  danilo da siva 21/4/2012, 20:57

    Oi noberto,

    Desculpe mais não deu certo, no meu formulario não acontece nada. Poderia fazer um exemplo por favor.


    .................................................................................
    Pensar nunca é insano.Pensar sozinho é humano.Pensar o pensamento de alguém é aprendizagem.
    O que não deu certo pode ser só uma etapa de aprendizagem pro que ainda está por vir.
    • Ir para o topo
    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº12

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Convidad 21/4/2012, 21:06


    Cole aí o código que você fez.
    • Ir para o topo
    danilo da siva
    danilo da siva
    danilo da siva
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 15/10/2011
    • Mensagem nº13

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  danilo da siva 21/4/2012, 21:18

    Private Sub fisico_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Me.Fisico = 1 Then
    Me.Juridico.Enabled = False
    Me.CNPJ.Enabled = False
    Me.Fisico.Enabled = True
    Me.CNPJ.Enabled = True

    ElseIf Me.Juridico = 2 Then
    Me.Juridico.Enabled = True
    Me.CNPJ.Enabled = True
    Me.Fisico.Enabled = False
    Me.CPF.Enabled = False

    End If
    End Sub

    Este codigo não deu nenhum erro na depuração, porem ele nao desabilita a função


    .................................................................................
    Pensar nunca é insano.Pensar sozinho é humano.Pensar o pensamento de alguém é aprendizagem.
    O que não deu certo pode ser só uma etapa de aprendizagem pro que ainda está por vir.
    • Ir para o topo
    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº14

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Convidad 21/4/2012, 21:28


    Deve colocar o código no evento Após Atualizar do controle GrupoDeOpções que criou.

    Altere NomeDoControleGrupo para o nome que deu ao controle.


    Private Sub NomeDoControleGrupo_AfterUpdate()
       If Me.NomeDoControleGrupo = 1  Then  'físico
          Me.Juridico.Enabled = False
          Me.Cnpj.Enabled = False
          Me.Fisico.Enabled = True
          Me.Cpf.Enabled = True
       ElseIf Me.NomeDoControleGrupo = 2 Then  'jurídico
          Me.Juridico.Enabled = True
          Me.Cnpj.Enabled = True
          Me.Fisico.Enabled = False
          Me.Cpf.Enabled = False
       End If
    End Sub

    • Ir para o topo
    danilo da siva
    danilo da siva
    danilo da siva
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 15/10/2011
    • Mensagem nº15

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  danilo da siva 21/4/2012, 21:42

    Então Norberto,

    Fiz varias vezes aqui, troquei o nome do grupo e não acontece nada...o nome do grupo que criei foi Cadastro


    .................................................................................
    Pensar nunca é insano.Pensar sozinho é humano.Pensar o pensamento de alguém é aprendizagem.
    O que não deu certo pode ser só uma etapa de aprendizagem pro que ainda está por vir.
    • Ir para o topo
    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº16

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Convidad 21/4/2012, 21:54


    E você definiu os valores (1 e 2) para as caixas de seleção dentro do Grupo?

    Se mesmo assim não funciona, assim que der um tempinho, faço um exemplo.
    • Ir para o topo
    danilo da siva
    danilo da siva
    danilo da siva
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 15/10/2011
    • Mensagem nº17

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  danilo da siva 21/4/2012, 22:04

    Defini sim Noberto,

    Se der para fazer este exemplo ficarei agradecido.


    .................................................................................
    Pensar nunca é insano.Pensar sozinho é humano.Pensar o pensamento de alguém é aprendizagem.
    O que não deu certo pode ser só uma etapa de aprendizagem pro que ainda está por vir.
    • Ir para o topo
    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº18

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Convidad 21/4/2012, 22:40


    Então taí.


    Anexos
    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Attachmentdanilo.zip
    (13 Kb) Baixado 21 vez(es)
    • Ir para o topo
    danilo da siva
    danilo da siva
    danilo da siva
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 15/10/2011
    • Mensagem nº19

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  danilo da siva 21/4/2012, 22:53

    Muito obrigado Noberto,

    Era isto mesmo, o que eu fiz aqui esta igual, eu pensei que ao clicar em Fisico por exemplo, os campos juridico e cnpj ficariam desabilitados com uma cor diferente...
    Por isso não sabia se estava certo. Ha uma maneira de fazer isto, se não darei o caso como Resolvido.

    muito obrigado mesmo Noberto!!!!


    .................................................................................
    Pensar nunca é insano.Pensar sozinho é humano.Pensar o pensamento de alguém é aprendizagem.
    O que não deu certo pode ser só uma etapa de aprendizagem pro que ainda está por vir.
    • Ir para o topo
    Convidad
    avatar
    Convidad
    Convidado


    • Mensagem nº20

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Convidad 21/4/2012, 23:07


    Na verdade os controles mudam de aparência, ficando com a clássica cor "desabilitada".

    Podíamos definir a propriedade BackColor do controle para alterar sua cor, mas como o estamos desabilitando, a propriedade não se aplica.

    Bom que resolveu, e até a próxima!

    O Fórum agradece o retorno.

    Pode deixar que eu marco Resolvido.
    • Ir para o topo
    Conteúdo patrocinado

    Conteúdo patrocinado


    • Mensagem nº21

    [Resolvido]Bloquear e desbloquear atraves do grupo de opção Empty Re: [Resolvido]Bloquear e desbloquear atraves do grupo de opção

    Mensagem  Conteúdo patrocinado

    • Ir para o topo
      Data/hora atual: 7/5/2024, 20:54