Discussion :

[amelyfred]

Bonjour à tous,

Sur un de mes formulaire, je voudrais que si le champs Me.actionsImmFA a été saisi le champs Me.IdCollaborateurActionImm_FK doit être également saisi.
J'ai donc crée ce code qui fonctionne très bien

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
If (Me.actionsImmFA <> "" Or Not IsNull(Me.actionsImmFA)) And (Me.IdCollaborateurActionImm_FK = "" Or IsNull(Me.IdCollaborateurActionImm_FK)) Then
    MsgBox "Vous avez saisi des actions immédiates donc vous devez saisir un collaborateur ayant réalisé ces actions.", vbCritical, "Erreur de saisie"
    Exit Sub
End if

Si je mets quelque chose dans le champs actionsImmFa et rien dans le champs IdCollaborateurActionImm_FK, donc là j'ai bien mon message qui apparait. Si ensuite je mets quelques choses dans IdCollaborateurActionImm_FK ok pas de soucis ca ne mets pas de messages.
Par contre :
Si je mets quelque chose dans le champs actionsImmFa et rien dans le champs IdCollaborateurActionImm_FK, donc là j'ai bien mon message qui apparait. Mais si ensuitesupprime la valeur qui est dans mon champs actionsImmFA et bien là j'ai le message d'erreur alors que je n'ai rien dans les 2 champs. Comme si le fait de supprimer laissait quelque chose.
Savez vous pourquoi?

Merci d'avance
Fred

[nico84]

Bonjour,

Il faut remplacer le 1er or par and sinon c'est toujours vrai

[amelyfred]

Salut
Merci effectivement c'est nickel