Set Tabla = CurrentDb.OpenRecordset("Lista Control", dbOpenDynaset)
Tabla.MoveFirst
While Not Tabla.EOF
    Tabla.Edit
    Tabla!SiNo = False
    Tabla.Update
    Tabla.MoveNext
Wend

    Source: geocities.com/es/ensolva/Descargas/Documentos

               ( geocities.com/es/ensolva/Descargas)                   ( geocities.com/es/ensolva)                   ( geocities.com/es)