Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Private Sub Commande9_Click()
MaVar = DLookup("code", "etablissements", "code = " & code)
If Len(MaVar) > 0 And MaVar <> Forms!frmEtab!lstEtab.Column(1) Then
MsgBox "Ce code Etablissemente existe déjà"
etiEtab.Caption = Forms!frmEtab!lstEtab.Column(1) & "-" & MaVar
Else
If Me.Dirty Then
bonjour j'ai un probleme bizarre
Dans mon etiquette jais mis les valeurs de MaVar et de Forms!frmEtab!lstEtab.Column(1) , pour justement trouver le probleme , car MaVar = Forms!frmEtab!lstEtab.Column(1) mais jais quand meme le msgbox qui apparait

si quelqu'un a une idée d'ou provient le probleme :/