(Resolvido) caixa de combinação bloqueando

[Ubiraelson]

ola amigos

tenho um formulario com uma caixa de combinação com 2 valores ( emprestado e disponivel) tenho tambem 2 caixa de testo (dataentrega, datadevolucao);

o que eu gostaria e que quando eu escolher disponivel da caixa de combinação "situação" e clicar em um determinado botão de comando a datadevolucao fica enabled=true;

eu não sei como me refiro ao conteudo da caixa de combinação em VBA (Microsoft Visual Basic for Applications) como por exemplo o Test da caixa de testo.

obrigado

[MrMALJ]

Simples

if me.suaCaixa="situação" then
    .....Comandos se for verdade
else
    .....Comandos se for falso
end if

Ok?

[Humm]

crie um evento apos atualizar na sua caixa de combinacao..

isso significa que após atualizar a caixa, ela vai executar um PROCEDIMENTO DE EVENTO no vba

ai la no VBA vai aparecer:

private sub sua_combobox_afterupdate()

if me.sua_combobox = "emprestado" then 'condição que valida a seleção caso seja EMPRESTADO
    me.seu_outro_controle.enabled = true 'aqui seu controle alvo pega o estado de ativado
elseif me.sua_combobox = "disponivel" then 'a outra condição que valida a seleção caso seja DISPONIVEL
    me.seu_outro_controle.enabled = false 'aqui seu controle alvo pega o estado de desativado
end if 'fim das condições

end sub

isso é para você ir entendendo o codigo.

[Ubiraelson]

poxa consegui fazer o evento de boa. mais sem entender para aprender.

explica ae o usou "me. " ou disponibiliza um link que fala sobre ele.

valeu.

[Humm]

veja bem.. todo evento vba sai de algum lugar de origem..

nesse caso, o está vindo do form em questao..

então quando você coloca o me. no codigo, você indica que a origem do que vier depois do me. é o proprio form..

me.seucampo = form!seuform.seucampo

sacou? é como se fosse um atalho.

[MrMALJ]

Posso colocar como resolvido?

[Ubiraelson]

mrmal Deu problema foi testar e não funfou

voltei do zero

help

hahahaha pode fechar resolvi o bug que tava dando.

obrigado pela ajuda ae

[Humm]

o intuito do forum é compartilhar justamente essas informacoes..

descreva como resolveu o erro para a posteridade