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) :
si vous aviez une idée ça m'arrangerait bien, c'est un peu nase de devoir faire F5 tout le temps
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
merci d'avoir lu en tout cas
Partager