Bonjour,
J'ai un formulaire de consultation d'une table chantier, et je voudrais créer un bouton pour ouvrir un autre formulaire d'ajout de chantier.
Or lorsque je fais ca, je ne peux pas ajouter, meme en fermant auparavant le formulaire de consultation.
Voila mon code :
J'ai essayé via une macro mais cela donne la meme chose je ne peux pas ajouter.
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
19
20 Private Sub Commande11_Click() On Error GoTo Err_Commande11_Click DoCmd.Close Dim stDocName As String Dim stLinkCriteria As String stDocName = "chantier" DoCmd.OpenForm stDocName, , , stLinkCriteria Exit_Commande11_Click: Exit Sub Err_Commande11_Click: MsgBox Err.Description Resume Exit_Commande11_Click End Sub
Y a t-il une astuce.
Merci d'avance.
Partager