bonjour,

voilà j'ai créé une requête en VBA pour rafraichir automatiquement un formulaire et ça ne fonctionne pas.

En fait j'ai une liste d'excursions et j'aimerais la mettre à jour. En dessous, il y a un formulaire avec les clients qui participent à l'excursion sélectionnée. Quand je modifie la quantité du client (qtite), j'aimerais mettre à jour la liste (qui s'appelle excus dans tous les formulaires concernés.

voilà ce que j'ai mis comme code VBA, trouvé sur internet (je suis nul (débutant) en VBA) :

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 qtite_AfterUpdate()
If CurrentProject.AllForms("Form1").IsLoaded Then
Forms![Form1]![excus].Requery
Else
End If
If CurrentProject.AllForms("Form2").IsLoaded Then
Forms![Form2]![excus].Requery
Else
End If
If CurrentProject.AllForms("Form3").IsLoaded Then
Forms![Form3]![excus].Requery
Else
End If
If CurrentProject.AllForms("Form3").IsLoaded Then
Forms![Form3]![excus].Requery
Else
End If
End Sub
si vous aviez une idée ça m'arrangerait bien, c'est un peu nase de devoir faire F5 tout le temps

merci d'avoir lu en tout cas