Potresti
- Calcolare il numero di record
- Andare al Primo record
- fare un ciclo su tutti i record della maschera ( ne sai gia il numero )
Finito


codice:
Private Sub Pulsante_Click()

' Mi trovo il numero di record da confermare
Dim NRec As Integer
NRec = Me.Recordset.RecordCount

' Fermo tutto se non ci sono record da confermare
If NRec < 0.5 Then
    MsgBox "Non ci sono clienti da confermare"
    Exit Sub
End If

' Se invece ci sono record vado al primo
Me.Recordset.MoveFirst

' dopo ciclo su tutti i record ( verso il basso ) mettendo la conferma
Dim x As Integer
For x = 1 To NRec
    Me.conferma.Value = True
    Me.Recordset.MoveNext
Next

' alla fine per bellezza ritorno al 1° record
Me.Recordset.MoveFirst

End Sub
Facci sapere
.