OVH Cloud OVH Cloud

du code qui modifie du code

3 réponses
Avatar
MacDav
Bonjour,
Je souhaite qu'un évenement puisse me modifier le code d'un autre evenement
du style:
Forms![Calendrier]![Calendar].OnExit = "Forms![test]![Date] = Me!Calendar"
Comment faire?

3 réponses

Avatar
Raymond
Bonjour.

je t'avais envoyé ce post ce matin:

Si tu mets le code sur le calendrier , celui-ci ne peut plus te servir pour
d'autres contrôles.
il vaut mettre l'événement sur chaque champ qui fait appel au calendrier tel
que:
Private Sub madate_DblClick(Cancel As Integer)
Me.madate = Me.Calendar0
End Sub

Chaque fois que tu double-cliques, la date du calendrier est placée dans le
champ.


--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"MacDav" a écrit dans le message de
news:
Bonjour,
Je souhaite qu'un évenement puisse me modifier le code d'un autre
evenement

du style:
Forms![Calendrier]![Calendar].OnExit = "Forms![test]![Date] = Me!Calendar"
Comment faire?




Avatar
MacDav
Merci pour l'attention prêtée à mon problème.
Si je fais comme tu me dis, ça oblige l'utilisateur à d'abord choir une date
dans le calendrier puis de l'importer par double clique dans le controle.
Ils ne vont pas comprendre.
Ce que je pensais faire:
- Placer un bouton à coté de mon controle, quand je clique sur ce bouton, un
petit formulaire contenant un calendar apparait, en même temps, je modifie
le code de fermeture de ce formulaire pour que la date soit inscrite dans
mon controle en quittant
- A chaque fois que j'appel se formulaire, je change la ligne de code de
fermeture pour lui dire où inscrire la valeur.

Sur le forlulaire de départ:
Private Sub Bt_Click()
DoCmd.OpenForm "Calendrier"
Forms![Calendrier]![Calendar] = Me!Date
ici qq chose qui modifie ce qui se trouve en dessous
End Sub

Sur le formulaire Calendrier
Private Sub Calendar_Exit(Cancel As Integer)
Forms![test]![Date] = Me!Calendar ' Ligne a modifier par
Bt_Click() et qui précise où inscrire les valeurs
End Sub

Dommage qu'on n'ait pas les pointeurs comme en C...

J'espère être plus clair !
Pas facile...

"Raymond" a écrit dans le message de
news:
Bonjour.

je t'avais envoyé ce post ce matin:

Si tu mets le code sur le calendrier , celui-ci ne peut plus te servir
pour

d'autres contrôles.
il vaut mettre l'événement sur chaque champ qui fait appel au calendrier
tel

que:
Private Sub madate_DblClick(Cancel As Integer)
Me.madate = Me.Calendar0
End Sub

Chaque fois que tu double-cliques, la date du calendrier est placée dans
le

champ.


--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"MacDav" a écrit dans le message de
news:
Bonjour,
Je souhaite qu'un évenement puisse me modifier le code d'un autre
evenement

du style:
Forms![Calendrier]![Calendar].OnExit = "Forms![test]![Date] Me!Calendar"
Comment faire?







Avatar
MacDav
Est ce que l'objet Reference ne pourrait pas m'aider à passer un paramètre
d'un formulaire à l'autre ?


"Raymond" a écrit dans le message de
news:
Bonjour.

je t'avais envoyé ce post ce matin:

Si tu mets le code sur le calendrier , celui-ci ne peut plus te servir
pour

d'autres contrôles.
il vaut mettre l'événement sur chaque champ qui fait appel au calendrier
tel

que:
Private Sub madate_DblClick(Cancel As Integer)
Me.madate = Me.Calendar0
End Sub

Chaque fois que tu double-cliques, la date du calendrier est placée dans
le

champ.


--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"MacDav" a écrit dans le message de
news:
Bonjour,
Je souhaite qu'un évenement puisse me modifier le code d'un autre
evenement

du style:
Forms![Calendrier]![Calendar].OnExit = "Forms![test]![Date] Me!Calendar"
Comment faire?