Para actualizar una tabla
¿Para actualizar una tabla en access desde vba como se direcciona al registro que quier actualizar?
1 respuesta
Respuesta de ohmygood
1
Hay varias formas de hacerlo te pongo el código de una, supongamos que esa tabla tiene el campo codigo_id que es campo que identifica al registro unicamente, estos campos son contadores, autonuméricos normalmente, entonces haríamos
dim db as database
dim rs1 as dao.recordset
set db = currentdb
set rs1 = db.openrecordset("select * from tabla1 where codigo_id = " & me.codigo_id)
rs1.edit
rs1("campo1") = valorx
rs1("campo2") = valory
etc
rs1.update
Db. Close
Para que te funcione en la misma pantalla de código ves al menu herramientas - referencias y marca la referencias microsoft dao.
dim db as database
dim rs1 as dao.recordset
set db = currentdb
set rs1 = db.openrecordset("select * from tabla1 where codigo_id = " & me.codigo_id)
rs1.edit
rs1("campo1") = valorx
rs1("campo2") = valory
etc
rs1.update
Db. Close
Para que te funcione en la misma pantalla de código ves al menu herramientas - referencias y marca la referencias microsoft dao.
