Datos Useform Excel desde Acces
Deseo realizar una consulta desde acces
con un UserForm excel y la idea es que al seleccionar un dato que cargo en un combobox que ha sido previamente cargado con una conexion ado rst me ingresa sin problemas datos de una tabla de la columna 1, quisiera que al seleccionar un dato del combo me traiga el dato relacionado en la tabla de acces columna dos a un text box, utilizo el siguiente codigo:
Dim numero As Variant
numero = ComboBox1
Set rst = New ADODB.Recordset
With rst
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Open "select * from Datos where Documento = '" & numero & "'", cnn
End With
TextBox1 = rst("Nombre")
Al momento de ejecutarlo sale un error
"No se puede configurar la propiedad value.Los tipos no coinciden" y sale en amarillo la linea textbox1 = rst("Nombre")al depurar , la verdad he intentado mucho verificando datos de la tabla el tipo de columna pero el codigo no me ejecuta, quisiera saber si alguiien me asesora sobre el error o me informa otro codigo para hacer la consulta.
con un UserForm excel y la idea es que al seleccionar un dato que cargo en un combobox que ha sido previamente cargado con una conexion ado rst me ingresa sin problemas datos de una tabla de la columna 1, quisiera que al seleccionar un dato del combo me traiga el dato relacionado en la tabla de acces columna dos a un text box, utilizo el siguiente codigo:
Dim numero As Variant
numero = ComboBox1
Set rst = New ADODB.Recordset
With rst
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Open "select * from Datos where Documento = '" & numero & "'", cnn
End With
TextBox1 = rst("Nombre")
Al momento de ejecutarlo sale un error
"No se puede configurar la propiedad value.Los tipos no coinciden" y sale en amarillo la linea textbox1 = rst("Nombre")al depurar , la verdad he intentado mucho verificando datos de la tabla el tipo de columna pero el codigo no me ejecuta, quisiera saber si alguiien me asesora sobre el error o me informa otro codigo para hacer la consulta.
