ACCESS - Añadir checkBox al formulario continuo para editar la fila

[aika]

Si no puedes modificar la tabla para añadir un nuevo campo que te sirva de marcador de fila prueba este código

Option base 1
' La matriz aLista guarda los id's de las filas seleccionadas
Public aLista

Private Form_Load()
Me.RecordSource = "SELECT id, fecha, marca_estado([id]) AS marca FROM Tabla"
ReDim aLista(Me.Recordset.RecordCount)
End Sub

'------------------------
Private Sub marca_Click()
'------------------------
' El control [marca] del Form es un control de texto cuyo origen es el campo [marca] de la SELECT
' El control [marca] puede tener (si se quiere) Formato condicional:
' {El valor del campo es} {distinto de} "0" (color de fondo rojo)

If (aLista(Me.CurrentRecord) = "") Then
aLista(Me.CurrentRecord) = Me.id
Else
aLista(Me.CurrentRecord) = ""
End If
Me.marca.Requery
End Sub

'----------------------------------------
Public Function marca_estado(k) As String
'----------------------------------------
' Se utiliza para marcar el estado (seleccionado/no seleccionado)
' de un cuadro de texto ficticio en un multirregistro
' devuelve un valor a un campo ficticio del SELECT del Form
Dim i
marca_estado = "0"
For Each i In aLista()
If (i = k) Then
marca_estado = "1"
Exit For
End If
Next
End Function