déduire un jour à une date code vba

bonjour,
ettttt bien voilà, j'ai un formulaire ou j’affiche l'echeance et j'ai une autre cellule ou j'aimerai afficher cette echeance -1, j'ai utiliser ce code sur un evenement update mais ça ne marche pas:

Code:

---

1 2	Docmd.RunSql "UPDATE [TabInterval] SET [Echenance_1] = DateAdd('j',1,[Echeance]);"

---

a votre avissss???

Bonjour,

Si le contrôle qui contient l'échéance s'appelle Echeance et la veille s'appelle Echeance_1, alors la source de Echeance_1 est, tout simplement :

Code:

---

= Me.Echeance - 1

---

Si Echeance_1 est un contrôle sans source et que c'est la Mise à jour de Echeance qui doit provoquer l'affichage alors, dans l'événement Après mise à jour de Echeance, ce code

Code:

---

Me.Echeance_1=Me.Echeance - 1

---

Citation:

---

Envoyé par ClaudeLELOUP

Bonjour,

Si le contrôle qui contient l'échéance s'appelle Echeance et la veille s'appelle Echeance_1, alors la source de Echeance_1 est, tout simplement :

Code:

---

= Me.Echeance - 1

---

Si Echeance_1 est un contrôle sans source et que c'est la Mise à jour de Echeance qui doit provoquer l'affichage alors, dans l'événement Après mise à jour de Echeance, ce code

Code:

---

Me.Echeance_1=Me.Echeance - 1

---

---

Merci pour la solution et pour le code, je vais l'essayer.

Citation:

---

Envoyé par han87

Merci pour la solution et pour le code, je vais l'essayer.

---

et bien j'ai essayer le code, et il marche pas.
Par ce que j'ai oublier de citer une autre chose les deux case dont je parle appartient à un sous formulaire qui est lier a une table, et c'est assez normale que le jeu d’enregistrement ne marche pas.

j'ai essayer de manipuler le sous formulaire on exécutant un événement sur chargement pour qu'il puisent à chaque fois remplir la case echeance_1 a partir de la case echeance et ensuite y on déduire un jour, mais ça ne marche pas.

Peux-tu poster un base de données Access2000 avec ton formulaire et ses tables ?