j'avais créer une macro dans laquelle je suprimais des enregistrements et ce, en fonction d'un test sur le type de jour.
Cette macro fonctionnait correctement mais les enregistrements supprimés étaient remplacés par un #suprimé
j'ai trouvé dans les FAQ qu'il fallait utiliser Requery
j'ai doncmis dans mon code DoCmd.Requery "datesaisie" ou date de saisie est un des champs de l'enregistrement
mais il ne se passe rien, j'ai toujours #suprimé
Y-aurail-il une erreur dans mon code, comment remédier à ce problème
ci-dessous mon code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub sup_dim_Click()
 
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim reponse As Integer
Set db = Application.CurrentDb
reponse = MsgBox("ETES VOUS CERTAIN DE VOULOIR SUPPRIMER LES DIMANCHE", vbYesNo + vbQuestion, "sortir")
If reponse = vbNo Then
MsgBox ("VOUS ALLEZ SORTIR DU FORMULAIRE")
DoCmd.Close
Else
 
db.Execute ("delete SAISIE.DATESAISIE, SAISIE.MATINW, SAISIE.AMW FROM SAISIE WHERE (Weekday([datesaisie]))=1 And ([MATINW]=0 AND [AMW]=0);")
 
 
End If
DoCmd.Requery "datesaisie"
End Sub