GNT sans publicité, site mobile, fonctionnalitées exclusives...

bookmark via un controle calendrier

Le
macgiver
bonjour, j'ai un controle calendrier dans mon formulaire qui inscrit la date
dans ma table, je me suis mis une condition pour pas que la date ne se répète
2 fois (jusque là tout va bien). Je voudrais être capable, lorsque l'usager
entre une date déja présente dans ma table, que mon formulaire pointe sur
cette date, le meme principe que ce cette procédure qui fonctionne
parfaitement avec une liste déroulante sur l'événement after update.

Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[cle] = " & Str(Me![Modifiable13])
Me.Bookmark = rs.Bookmark

Donc mon problème c'est que ce n'est pas une liste déroulante mais bien un
controle calendar. comment m'y prendre??? Merci
Lire les 2 réponses

Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Raymond [mvp]
Le #6095911
Bonjour.

tu fais exactement pareil.
exemple:
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[Madate] = #" & Format(Me![Madate], "mm/dd/yyyy") & "#"
If Not rs.EOF Then
' ici une date trouvée
Me.Bookmark = rs.Bookmark
Else
' ici pas de date trouvée.
End If


--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://www.mpfa.info/ pour débuter sur le forum.
Inscrivez-vous à la Newsletter TechNet.
http://www.microsoft.com/france/tec...fault.mspx


"macgiver" news:
| bonjour, j'ai un controle calendrier dans mon formulaire qui inscrit la
date
| dans ma table, je me suis mis une condition pour pas que la date ne se
répète
| 2 fois (jusque là tout va bien). Je voudrais être capable, lorsque
l'usager
| entre une date déja présente dans ma table, que mon formulaire pointe sur
| cette date, le meme principe que ce cette procédure qui fonctionne
| parfaitement avec une liste déroulante sur l'événement after update.
|
| Dim rs As Object
| Set rs = Me.Recordset.Clone
| rs.FindFirst "[cle] = " & Str(Me![Modifiable13])
| Me.Bookmark = rs.Bookmark
|
| Donc mon problème c'est que ce n'est pas une liste déroulante mais bien un
| controle calendar. comment m'y prendre??? Merci
macgiver
Le #6095301
merci ça fonctionne

a+
Publicité
Suivre les réponses
Poster une réponse
Anonyme