[Resolvido]atualizar caixa de combinação

eu tenho um formulários com vários subformulário e um deles tem uma cx de combinação que busca a designação do material.
Só que quando o item que quero nessa cx não existe tenho que acrescentar outro, mas para que ele apareça tenho que fechar o formulário e tornar a abrir. Há alguma forma de eu acrescentar o item e ele aparecer na cx sem ter que fechar o formulário?
Ok aqui vaio BD
o formulário é "Folha obra planeamento" o subformulário é " Orçamentação materiais designação"
a cx. de combinação "designação"
Obrigado

Boa tarde,

Seria mais fácil postares aqui tua BD para dar um Help.


Abraço...

Bom dia,

tente assim:

Nas propriedades "ao receber o foco" coloque:

'Atualiza o controle quando recebe o foco
Me.SuaCombo.Requery

Vlw

Silvanio123
obrigado pelo teu contributo mas não deu

Boa tarde Viriato


Na sua combo "Designação"

Limitado a Lista = Sim

No acontecimento: Se não estiver na lista

Dim sql As String
If MsgBox("SeuCampo não cadastrado" & Chr(13) & Chr(13) & "Deseja cadastrar este Campo " & UCase(NewData) & " agora?", vbYesNo, "Cadastro de Campo") = vbYes Then
DoCmd.SetWarnings False
sql = "INSERT INTO SuaTabela (SeuCampo) VALUES ('" & NewData & "')"
DoCmd.RunSQL sql
DoCmd.SetWarnings True
Response = acDataErrAdded
Else
Response = acDataErrDisplay
End If

bom dia Assis,obrigado pela sua colaboração.
Eu tentei fazer como me sugeriu,mas não deu, talvez porque eu também não tenha percebido.
Obrigado

José

Disseste:
>>> o subformulário é " Orçamentação materiais designação"

Não existe tal formulário e sim dois formularios (um cópia de outro) com o nome 'materiais planeamento'.

Vou verificar nesse

Noob

Aqui está o exemplo modificado

Bom estudo.

Noob

obrigado Noobezinho pelo teu contributo ficou ótimo

Ótimo

Valeu por por retornar

Boa sorte

Noob