Access - Error en la función DLookup

Hola amigos, les doy las gracias desde ya por ayudarme.
Tengo una tabla de nombre tVendedores con los capos codVendedor (tipo texto), NomVendedor (tipo texto), DomicilioVendedor (tipo texto). Un formulario frmVendedores con un campo llamado txtCodVendedor en el que estoy queriendo validar el dato que se introduce para comprobar si existe o no. Tengo el siguiente código:

Private Sub txtCodVendedor_AfterUpdate()
Dim vValor, vValorB As Variant
vValor = Me.txtCodVendedor.Value

If IsNull(vValor) Then Exit Sub

vValorB = DLookup("[codVendedor]", "tVendedores", "[codVendedor]=" & vValor)

If vValorB = vValor Then

MsgBox "El valor introducido ya existe", vbInformation, "AVISO"
Me.txtCodVendedor.Value = Null

End If
End Sub

Me da el siguente Error: Se ha producido el error '3464' en tiempo de ejecución: No coinciden los tipos de datos en la expresión de criterios.

Angel
Rosario. Argentina

Hola leftad

El problema es que tratas de comparar un campo Texto contra uno numerico, por mas que declares la variable como variant, a la funcion agregada de dominio le indicas que compare numeros contra texto.

Prueba con
vValorB = DLookup("[codVendedor]", "tVendedores", "[codVendedor]= '" & vValor & "'")


Desde Venezuela
Jefferson

Jefferson Espectacular Muchas Gracias

Muchas gracias por la respuesta me fue de mucha utilidad.