[Resolvidos] Combinar AfterUpdate de uma combo com Not inList

Salve salve experts do access
sou novo no access e gostaria que pudessem me ajudar a solucionar uma questão
eu tenho um bd e nesse bd tenho um form que cadastra clientes e tem uma combo CEP aonde eu digito o CEP e a aparece os outros dados do endereço através do AfeterUpdate da combo abaixo:

Private Sub CEP_AfterUpdate()
Me.CEP = CEP.Column(0)
Me.End = CEP.Column(1)
Me.Bro = CEP.Column(2)
Me.Cid = CEP.Column(3)
Me.Est = CEP.Column(4)
End Sub

certo o que eu queria era que quando eu digitar um CEP não existente ele abrisse automaticamente o form de cadastro de endereços frmEndereços e depois que eu cadastrar o endereço e fechar o frmEndereço possa voltar e ter a combo de endereço atualizada com o novo endereço e mantendo o foco em si.
Eu tentei fazer isso com o if e then aqui mas, não consegui se alguem puder me ajudar fico muito grato.
abraços.

Ola bom dia seja bem vindo ao fórum.

É simples o que o amigo quer.

Recomendo que altere o nome dessa combox de CEP para cboCEP, para que não seja igual ao nome do campo, isso no futuro poderá trazer problemas.

No evento vba Se não tiver na lista dessa combox cole isto;

Private Sub cboCEP_NotInList(NewData As String, Response As Integer)
Response = acDataErrContinue ' Inibe msg padrão do Access.
If MsgBox("CEP não cadastrado: '" & NewData & "'" & vbCrLf _
& "Deseja Cadastrar?", 32 + vbYesNo) = 6 Then
DoCmd.OpenForm "frmEndereços", , , , acFormAdd, _
acDialog, NewData
' A execução deste código fica interrompida aqui até o
' fechamento do formulário frmEndereços.
Response = acDataErrAdded
Else
Response = acDataErrContinue
End If
End Sub

Amigo, obrigado pela recepção e pelo retorno.
Está dando um erro aqui por causa dos campos que são automaticamente atualizados quando eu escolho o CEP. Esses campos são o de "Endereço" (Rua), o de "Bairro", o de "Cidade" e o "UF" esse form foi criado pelo assistente e portanto automaticamente vinculado à tabela aí diz que o campo não pode ficar vazio e abre o depurador com a seguinte linha marcada

Me.Endereço = cboCEP.Column(1)

não seria o caso de eu mudar o código do AfeterUpdate para outro evento ou então colocar alguma coisa antes desse código fazendo com que ele pule para o evento NotInList se o CEP não estiver cadastrado?
Agradeço pela atenção.

Tem de colocar Limitado à Lista = Sim, na aba Dados da Combobox.

E no evento After coloque:

Private Sub cboCEP_AfterUpdate()
If IsNull(Me.cboCEP) Or Me.cboCEP.Value = "" Then
Exit Sub
Else
Me.CEP = cboCEP.Column(0)
Me.End = cboCEP.Column(1)
Me.Bro = cboCEP.Column(2)
Me.Cid = cboCEP.Column(3)
Me.Est = cboCEP.Column(4)
End If
End Sub

Muito bom amigo funcinou perfeitamente. é como eu sempre digo quem quer aprender deve trocar ideias e experiências com quem realmente entende.
Agora eu só queria que o frmEndereço já abrisse com o CEP preenchido e com o foco no próximo campo que seria o campo "Endereço". Não consegui fazer isso funcionar aqui acho que estou no caminho certo mas ainda não deu, hehehe.
Será que isso é possível?
Desde ja obrigadão pelo empenho.

Coloque no evento VBA ao abrir do form Endereços

Private Sub Form_Open(Cancel As Integer)
If Not IsNull(Me.OpenArgs) Then
DoCmd.GoToRecord , , acNewRec
Dim x As String
x = Me.OpenArgs
Me.CEP = x
End If
Me.Endereço.SetFocus
End Sub

grande jpaulo funcionou maravilhosamente bem só que estou tentando fazer o formEndereço fechar após eu dar enter depois que preecher todos os dados do endereço e não congigo. tentei usar uma macro para fechar no evento ao sair e ao perder foco do último campo mas em ambos os casos aparece uma mensagem de erro dizendo que não pode fechar um formulário que tem um evento associado a ele, algo assim.
deu para perceber que não tenho muito a aprender, tenho tudo a aprender né? rsrsrs
e deu pra perceber que quero automatizar ao máximo as tarefas tambem, rsrsrs.

Após atualizar no ultimo campo;

Private Sub UltimoCampo_AfterUpdate()
On Error Resume Next
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.Close acForm, "frmEndereço"
End Sub

conversar com quem sabe é outra coisa hehehe
parabens jpaulo, você é bom nesse trem mesmo, será que um dia chego na metade do que você sabe? rsrsrs
muito obrigado mesmo e até a próxima dúvida.

Por este caminho um dia será uma fera sim.

Obrigado pelo retorno.