Access: botón para reemplazar valores en formulario

[Taribo007]

Supongo que si lo habra, pero yo es que no suelo usar macros. pero es muy sencillo, solo pon un boton en el pies del formulario, vete a sus propiedades, pestaña eventos. Colocate sobre la linea del evento "Al hacer click", muevete a la derecha del todo y pulsa un botoncito con tres puntitos (...). Te saldra una ventana donde eliges "Generador de codigo".

Se te abrira la ventana de VBA con el evento adecuado, es decir, algo asi:

Private Sub Comando0_Click()

End Sub

Pues justo entre esas dos lineas, pones lo que te he puesto antes, y listo.

Private Sub Comando0_Click()
Dim rst As DAO.Recordset

Set rst = Me.RecordsetClone
While Not rst.EOF
If Nz(rst!A, False) = True Then
rst.Edit
rst!A= False
rst.Update
End If
rst.MoveNext
Wend

rst.Close
Set rst = Nothing

End Sub

Bueno, falta un pequeño detalle. Con la ventana de codigo VBA abierat, en el menu de arriba pulsa en Herramientas >> referencias. Te sale un listado de referencias con un "click". Tienes que buscar una que es: Microsoft DAO X.XX object Library y hacer click en ella

Lo de X.XX depende de la version que uses de access.

Un saludo