Discussion :

[celine31190]

Bonjour,

Me revoilà pour un autre problème.

J'aimerais que ma case à cocher "Devis a faire" se décoche dès qu'un date est mise dans "Devis fait le"

Je suis sûre que ça a l'air simple dit comme ça, mais je n'arrive toujours pas a trouver la solution.

Merci d'avance d'éclairer ma lanterne

[madefemere]

Bonjour,

Sur l'évènement Après MiseAJour (AfterUpDate) de ton champ Devis fait le, tu mets le code :

Code :

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

If Not IsNull (Me.Devis_Fait_Le) or Me.Devis_Fait_Le<>"" then Me.Devis_A_Faire = True

Tu adaptes les noms des champs.

Cordialement,

[celine31190]

Bonjour madefemere,

Heureusement que tu es là pour m'aider a chaque fois ^^

Alors j'ai essayé le code, et rien ne changes, c'est comme si je n'avais rien fais.

[madefemere]

Bonjour Celine,

On traîne de temps en temps ici donc autant aider les autres;
Quand tu dis ça ne marche pas, ce n'est pas suffisant pour les gens à distance pour comprendre. Expliques qu'est-ce qui ne marche pas. Quelle est l'erreur s'il y en a.
Mets ton code parce que les raisons peuvent être multiples : un contrôle mal orthographié, un code sur le mauvais évènement...
Est-ce que ton champ Devis_Fait_Le accepte bien les valeurs Null ou " " ?
Sinon mon code était incomplet parce qu'il ne tratitait pas les cas contraires.
Essaies :

Code :

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

1
2
3
4
5
If Not IsNull (Me.Devis_Fait_Le) or Me.Devis_Fait_Le<>" " then 
     Me.Devis_A_Faire = True
Else
     Me.Devis_A_Faire = False
End If

Cordialement,