Forum Discussion
Establecer valor por defecto Combo Box desde una SQL query
¡Hola!
Con un evento adecuado (abrir el formulario o algo así) puedes utilizar un código como éste:
Dim rs As DAO.Recordset
Dim strSQL As StringstrSQL = "SELECT Campo1 " & _
" FROM Tabla " & _
" WHERE Id=42"
Set rs = CurrentDb.OpenRecordset(strSQL, dbOpenSnapshot)If Not rs.BOF Then
Forms!Formulario1!Combo1.DefaultValue = rs!Campo1
End IfServus
Karl
************
Access News (March edition)
Access DevCon (April 28+29)
Hola, muchas gracias una vez mas, siento hacer tantas preguntas, pero es que no termina de funcionar correctamente, pero parece que poco a poco vamos avanzando.
Una vez mas, no se que falla exactamente...:
Muchísimas gracias Karl_Donaubauer, ya funciona todo a la perfección. Mil gracias!!!!! 🙂
Hola Karl, muchas gracias por la ayuda, ahora parece que falla otra instrucción:
Muchísimas gracias.
