Bonsoir,
J ai le code suivant qui execute la fermeture du form en cours et l ouverture d un autre.
Seulement le temps que le traitement se fasse l utilisateur voit apparaitre la fenetre Access avec toutes les tables ce qui n est pas trés ergonomique dixit les utilisateurs. Quelqu'un sait il pourquoi.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Set req = db.CreateQueryDef("selection5", "select * from [Annuelle_GP] where [Annuelle_GP].[nom de la station]= '" & indic & "' and Cstr([Annuelle_GP].[Date annuelle])= '" & an & "'") DoCmd.OpenForm "Annuelle_gp", acNormal, "selection5", , acFormEdit, acWindowNormal Forms![Annuelle_gp]![nom de la station] = indic Forms![Annuelle_gp]![Date annuelle] = an Forms![Annuelle_gp]![encours].Visible = True Forms![Annuelle_gp]![cours] = True Forms![Annuelle_gp]![Étiquette48].Visible = False DoCmd.Maximize DoCmd.Close acForm, "calibration", acSaveYes
Parfois j ai même un genre d'écran noir qui apparait quand un form se ferme et un autre s ouvre.
Merci pour vos conseils.
Partager