[Resolvidos]Campo activo com base em um outro campo

Boa tarde, antes demais gostaria de pedir desculpa a todos aqui do fórum caso eu esteja a abrir um tópico já respondido anteriormente ou se, não for no local indicado.

Sou novo no fórum e ainda não me ambientei muito bem.

Bom a minha questão deve ser muita básica, mas, como eu não percebo muito de access pois, sou novato gostaria de saber como posso activar um campo com base em outro. Por exemplo:

1.º - Tenho um campo que se chama Nome no meu formulário;

2.º - Tenho um campo que se chama Idade;

O que eu quero é que o campo Idade esteja invisivel e só seja visivel quando no campo Nome for colocado o respectivo nome da pessoa, e então colocar aí a respectiva idade.

Desde já um muito obrigado a todos.

Novamente peço desculpa caso não seja o local indicado. Até breve assim o espero.

P.S - Vocês são uns expert's no que diz respeito a todo o conteúdo do access. Parabéns a todos.

ola esta duvida parece-me pertencer à sala dos formulários.

entre nas propriedades do seu formulario, carregue nos 3 pontinhos da linha no actual, escolha procedimento de evento.

quando abrir o vba digite:

If IsNull(Me.SeuCampoIdade) Then
Me.SeuCampoIdade.Visible=False
Else
Me.SeuCampoIdade.Visible=True
End If

Boa tarde Ricardo desde já um muito obrigado pela sua resposta rápida mas, não estou a conseguir.
Fiz como me explicou e não consigo. A idade desaparece ao inserir um novo registo certo... mas, quando insiro o nome da pessoa o campo idade não fica activo e deveria ficar para que pudesse inserir os dados.

Agradeço desde já a sua ajuda. Muito obrigado.

Olá joauanva,

Podes colocar o código no evento OnTimer do formulário.

Não te esqueças de mudar o valor Interlo do Cronometro de 0 para 500 por exemplo.


Private Sub Form_Timer()

If IsNull(Me.Nome) Then
Me.Idade.Visible = False
Else
Me.Idade.Visible = True
End If

End Sub

só lhe disse a primeira parte, falta a segunda

no evento vba depois de actualizar do seu campo nome coloque:

Private Sub SeuCampoNome_AfterUpdate()
If Not IsNull(Me.SeuCampoNome) Then
Me.SeuCampoIdade.Visible = True
Else
Me.SeuCampoIdade.Visible = False
End If
End Sub

Peço desculpa mas, não consigo que dê certo.

Ajudem-me por favor.

coloque o seu banco em site publico para vermos isso para você

pode colocar aqui e colar aqui o link que gera

http://www.speedyshare.com/

Este é o respectivo link! Obrigado

http://www.speedyshare.com/files/21348241/Base_de_Dados2.accdb

Veja se é assim. Aqui funcionou certinho. Apague o nome que estiver na caixa e dê enter que o campo da idade desparece. Digitando algo no nome dando Enter de novo, o campo Idade reaparece.

http://www.speedyshare.com/files/21348579/Base_de_Dados2.accdb

Não consigo abrir.

diz-me que o "Id não pertence a este tabela"

E vai sempre aparecendo esta mensagem.

Mas, o que eu desejaria era que não fosse necessário clicar em enter para aparecer o campo idade, eu queria era que aparecesse assim que começasse a digitar no campo nome. Obrigado e desculpem a massada mas, iniciante e curioso é assim mesmo. Abraços para todos.

Amigos bom dia e desculpem a minha intromissão;

Veja se é o que pretende:

http://dl.dropbox.com/u/771097/Base%20de%20Dados2_OLD.rar

Muito obrigado JPaulo era isso mesmo que eu queria.

Também muito obrigado a todos os que se esforçaram por me ajudarem.

Até à próxima.

Que deverá ser muito em breve. Pois já está a surgir um outro problema. Poderei colocar aqui ou terei que abrir um outro post?

Obrigado pelo retorno.

Nova duvida, novo tópico.