Faça testes com os eventos abaixo, veja se algum te atende.
Private Sub TextBox1_Change()
' seu código de busca
End Sub
Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
' seu código de busca
End Sub
Private Sub TextBox1_Enter()
' seu código de busca
End Sub
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
' seu código de busca
End Sub
Postado : 15/05/2017 12:40 pm