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
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
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/technet/presentation/flash/default.mspx
"macgiver" a écrit dans le message de 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
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/technet/presentation/flash/default.mspx
"macgiver" <macgiver@discussions.microsoft.com> a écrit dans le message de
news: 808FC506-7298-4BCE-B5F4-BD8D374FF29D@microsoft.com...
| 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
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/technet/presentation/flash/default.mspx
"macgiver" a écrit dans le message de 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
