[Resolvido]impedir de abrir formulário se não tiver na lista - ACCESS VBA

Olá, estou com um problema que não consigo resolver.
Tenho uma pesquisa no ACCESS, entretanto, mesmo que não encontre o nome pesquisado está abrindo o formulário em branco. portanto, preciso que se eu fizer a pesquisa não encontrar nada que não seja aberto o fomulário.

O procedimento é o seguinte;

Private Sub Comb_Procura_AfterUpdate()
DoCmd.OpenForm "frm_andamento_processo", acNormal, "", "[pesquisa2]=[Forms]![frm_pesquisa]![comb_procura]", , acNormal
Comb_Procura = Null
DoCmd.Close acForm, "frm_pesquisa", acSaveYes
End Sub
----------------------

Se não encontrar nada para bastaria que ele mostrasse a janela dizendo " o nome pesquisa não existe na lista", entretanto, mesmo assim ele insiste em abrir o formulário em branco.

Private Sub Comb_Procura_NotInList(NewData As String, Response As Integer)
MsgBox "O nome pesquisado não existe na lista"
Response = 0
End Sub

Olá, já resolvi o problema

Private Sub Comb_Procura_AfterUpdate()
If Comb_Procura = Comb_Procura Then
DoCmd.OpenForm "frm_andamento_processo", acNormal, "", "[pesquisa2]=[Forms]![frm_pesquisa]![comb_procura]", , acNormal
DoCmd.Close acForm, "frm_pesquisa", acSaveYes
Else
End If
End Sub

-----

Private Sub Comb_Procura_NotInList(NewData As String, Response As Integer)
MsgBox "O nome pesquisado não existe na lista"
Response = 0
End Sub

assim se o nome estiver errado ele não abre e se não escrever nada apertar uma tecla ele também não abriu...