[Resolvido]Zerar valores da caixa de combinação

Olá, gostaria de saber como faço para que o valor da caixa de combinação volte a ser vazio após sua atualização, pois quando eu seleciono um valor nessa caixa ela abre outro formulário, mas gostaria que assim que ele abrisse o outro formulário ja voltasse a ser vazia.

Muito obrigado pela atenção de todos.

Coloque na linha abaixo da que abre o form e antes de End Sub:

Me.NomeDaCombo = Null

Então Criquio, eu estou usando uma macro, como faço para ver o código ? Obrigado

Tente o seguinte: abra a macro e, na linha de baixo, adicione a ação DefinirValor. No campo Item, coloque o nome do controle e no campo Expressão coloque Null.
Ou converta a macro para vba e olhe o código e implemente no evento Após atualizar da combo.

Que legal, não sabia que dava pra converter a macro para VBA, como faço isso?

Qual é a versão do Access que está usando? No 2007, você seleciona a macro, clica na guia Ferramentas de Banco de Dados e, no grupo Macro, escolhe a opção Converter macros em Visual Basic.

Estou usando o 2003, alias desculpa, eu deveria ter detalhado isso na pergunta

No 2003, selecione a macro e siga o passo Ferramentas > Macro > Converter macros em Visual Basic

Legal Criquio, Obrigado mesmo pela atenção... agora vou testar aquela linha que você havia me passado lá encima

jajá dou um retorno aqui...

Obrigado

Está certo. É só colocar o código do módulo gerado no evento Após atualizar da combo, no lugar da macro.
Fica a dica. Sempre que quiser implementar algo em vba e não souber como, tente criar uma macro com as funções desejadas e depois converta ela para vb e estude o código gerado.

Gostaria de agradecer ao Criquio pela atenção e parabenizar mais uma vez este forum, que na minha opinião é o melhor sobre o assunto.

Meu problma foi resolvido.

Só para fechar...

Private Sub CompDept_AfterUpdate()

DoCmd.OpenForm "formHardwareSoftware", acNormal, "", "", , acNormal
Me.CompDept = Null

End Sub

Private Sub CompUsuario_AfterUpdate()

DoCmd.OpenForm "formHardwareSoftware", acNormal, "", "", , acNormal
Me.CompUsuario = Null

End Sub

Private Sub ImpDept_AfterUpdate()

DoCmd.OpenForm "FormImpressoras", acNormal, "", "", , acNormal
Me.ImpDept = Null

End Sub

Private Sub ImpFabr_AfterUpdate()

DoCmd.OpenForm "FormImpressoras", acNormal, "", "", , acNormal
Me.ImpFabr = Null

End Sub

Ficou assim, está funcional... mas possui algo errado nesse código?
Obrigado ;D

Obrigado pelo retorno. Uma dúvida que surgiu. Esses campos são campos texto ou caixas de combinação? Não entendi o porque da quantidade de campos e o porque de estar listando os nomes dos formulários. Geralmente, quando temos uma combo para abrir formulários, colocamos assim:

Private Sub CompDept_AfterUpdate()
DoCmd.OpenForm CompDept, acNormal, "", "", , acNormal
Me.CompDept = Null
End Sub

ou seja, as linhas da combo contem os nomes exatos dos formulários ou a combo pode ter duas colunas, uma com o nome exato dos forms e outra com os nomes que quer que apareça na combo. Deixamos uma coluna oculta igualando sua largura a 0 e colocamos assim no Após atualizar:

Private Sub CompDept_AfterUpdate()
DoCmd.OpenForm CompDept.Column(0), acNormal, "", "", , acNormal
Me.CompDept = Null
End Sub

Column(0) significa que o nome exato dos forms estão na primeira coluna, que é a coluna oculta. Dessa forma, sempre abrirá o form da linha escolhida.

Criquio, ainda estou desenvolvendo... sou MUITOOO iniciante em access, não são para abrir formulários, já que existem apenas 3... me desculpe não entender tanto rs.... sou BEEEEEEEM iniciante no assunto... pra ter noção é o segundo banco que estou criando na minha vida rs...

pode olhar ... segue link... aproveita e me fala o que achou, sempre bom uma opinição de quem entende ;D

http://dl.dropbox.com/u/15334001/H%26S%202.0.mdb

Obs: ainda estou fazendo heinh =)

abraço

Agora entendi. Nesse caso, é por aí mesmo. Mãos à obra.

[Resolvido]

Obrigado pela força Criquio.