Discussion :

[paselo]

Bonjour

Dans une table liée, j'ai un champ "oui/non" ! J'ai besoin lorsque je clic sur un bouton d'un formulaire, que cette valeur "oui/non" de la table soit remise à "non" pour tous les enregistrements de la table !
Eventuellement possible aussi de remettre à "non" via une requête car j'utilise cette valeur aussi dans une requête

Merci

Pascal

[tee_grandbois]

bonsoir,
2 méthodes sont possibles, en parcourant les enregistrements du formulaire:

Code VBA :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Dim ors As DAO.Recordset
Set ors = Me.RecordsetClone
If ors.RecordCount > 0 Then
     ors.MoveFirst
     Do Until ors.EOF
         ors.Edit
        ors.Fields("ChampOuiNon") = 0
        ors.Update
        ors.MoveNext
     Loop
End If
Set ors = Nothing

ou par exécution d'une requête:

Code VBA :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim odb As DAO.Database
Set odb = CurrentDb
odb.Execute "update latable set ChampOuiNon = 0", dbFailOnError

[loufab]

Bonjour,

Beaucoup plus rapide avec la 2ème technique.

Cordialement,