Bonsoir,
Voila mon code au complet
Ce code oblige l'utilisateur de modifier manuellement le champs appeler [ID_Pavillons], et le temps de modifier je perd du temps, alors je pourrais en gagner si je réalise le changement automatique avec confirmation, j'ai changer
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 If IsNull(Me.Modifiable149) Then MsgBox "Sélectionner le pavillon svp" Else Me.Texte233.Requery Me.Texte235.Requery If Me.ID_Pavillons <> Me.Texte235 Then MsgBox "Ce matricule est attribuer au pavillon : " & [Texte233] Else Exit Sub End If End If
par celui-ci :
Code : Sélectionner tout - Visualiser dans une fenêtre à part MsgBox "Ce matricule est attribuer au pavillon : " & [Texte233]
la modification du champ [ID_Pavillons] est automatique aucune différence entre Oui ou Non, c'est normal car je ne sais pas où doit-je insérer le code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 if MsgBox ("Ce matricule est attribuer au pavillon : "& [Texte233], vbYesNo, "Confirmation") = vbNo Then Me.Undo Me.ID_Pavillons = Me.Texte235 MsgBox "La modification du pavillon est effectuer au nom de : " & [Texte233]
en plus le code en gras est signaler en jaune.
Code : Sélectionner tout - Visualiser dans une fenêtre à part Me.ID_Pavillons = Me.Texte235
je n'est plus d'idée et je n'est pas trouver d'exemple similaire sauf pour l'enregistrement.
Partager