Duda buscar dato exacto

Tengo un textbox que al cambiar va a la hoja busca un dato y lo pone en un label; sin embargo me busca cualquier parte del dato. Me explico, si en la base de datos tengo valores que empiezan por el mismo valor busca cualquiera que tenga ese dato y no el dato exacto.
Por ejemplo tengo en la base de datos el 10012 y luego 1001, si dígito 1001 el resultado que voy a obtener es el de 10012, ¿como hago para que me busque el dato exacto que dígito en el textbox?.
Por favor ayuda...

Private Sub TextBox1_AFTERUPDATE()
If TextBox1 = Empty Then
MsgBox "Por favor digite codigo a buscar"
Exit Sub
End If
CLIENTES.Select
busqueda = TextBox1.Value
 Set rango = Range("a:a").Find(busqueda)
 Label4 = Range("B" & rango.Row)
 Label10 = Range("c" & rango.Row)
 Label11 = Range("d" & rango.Row)
 Label13 = Range("e" & rango.Row)
 Label14 = Range("F" & rango.Row)
 Label6 = Range("I" & rango.Row) & "-"
 Label7 = Range("J" & rango.Row)
 Label18 = Range("G" & rango.Row)
 Label17 = Range("H" & rango.Row)
 Label20 = Range("K" & rango.Row) & "%"
 Label21 = Range("L" & rango.Row) & "%"
TextBox1.SetFocus
End Sub

Gracias!