Discussion :

[romulus34]

Aprés plusieurs recherches infructueuses, je fais appel à votre savoir.

Dans mon formulaire je dispose d'une case à cocher qui correspond à "Edité" et à coté un champ avec la date d'édition.

Lorsque je clic sur la case à coher je mets à jour le champ Edit de la table avec la valeur True. je voudrais rajouter à cela l'affichage de la date du jour lorsque je clic sur la case.

Champs utilisés de la table : Edit(True/False) , Date_Edit (Date)

Comment puis je faire pour que cela marche?
Un procédure en vba sur l'événement clic ou y a t-il plus simple?
Merci pour votre aide.

[loufab]

Bonjour,

Comment puis je faire pour que cela marche?
Un procédure en vba sur l'événement clic ou y a t-il plus simple?

Non il n'y a pas plus simple.

Code :

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

1
2
3
4
if me.caseachocher then
   me.date = now()
   ' ou me.date = date()
endif

Cordialement,

[romulus34]

Mais ce code il faut le rajouter dans le générateur d'expression ou de code?
Et il ne faut pas rajouter la valeur true à la case à cocher?
merci.

[loufab]

Mais ce code il faut le rajouter dans le générateur d'expression ou de code?
Et il ne faut pas rajouter la valeur true à la case à cocher?
merci.

C'est du code.

Non la valeur true est implicite.

Cela revient à écrire

Code :

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

if true then

Tout simplement.

Cordialement,

[romulus34]

Merci de ton aide je vais essayer avec ça.
Je te tiens au courant.

[Heureux-oli]

Pour ma part, j'utilise la méthode suivante.

Code :

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

1
2
3
4
 
Sub MaBox_AfterUpDate()
[MaDate] = Date()
End Sub