Hola.
He intentado desde VBA hacer un recordset a una instrucción SQL para obtener los datos y ponerlos en un textBox, a modo de formulario (Hablamos de Access 2007).
Se ejecuta en el evento de Change() de un comboBox...
El caso es que por mas que intento el Openrecordset SIEMPRE tira error, como si fallara al ejecutar la query.
Mi código:
Código:
Private Sub cuadro_modif_Change()
Dim dbMyDB As Database
Dim SQL As String
SQL = "SELECT [Nombre] FROM [modif_empresa1];"
Dim rsMyRS As Recordset
Set rsMyRS = CurrentDb.OpenRecordset(SQL, dbOpenSnapshot)
modif_nombre.Text = rsMyRS.Fields(0)
modif_nombre.Requery
rsMyRS.Close
End Sub
El SQL funciona como consulta, pero en VBA no.
El Error:
Código:
Se ha producido el error '3061' en tiempo de ejecución:
Pocos parámetros. Se esperaba 1.
He "registrado" medio internet sin exito jeje, ¿alguien me podría ayudar?
No se que hacer para que se ejecute correctamente...
Gracias y un Saludo