Enregistrement dans un controle data - VB/VBA/VBS - Programmation
MarshPosté le 21-04-2004 à 09:29:09
Bonjour,
J'ai créé un controle data lié à une table dans un userform. Quand je ferme le userform (unload) j'en appelle un autre ou j'ai là aussi crée un controle data lié à la même table. J'aimerai retrouver dans le deuxième userform l'enregistrement sur lequel j'étais dans le premier. comment dois-je faire ?
Dois-je me récupérer le bookmark (je ne suis pas sur de bien comprendre cette notion) du premier et ensuite le passer à mon deuxième controle data ?
J'avais écrit le code suivant qui ne marche pas bien sur mais qui peut vous éclairer sur ce que je veux faire: UserForm1: Dossier.Dossierdata.Recordset.Update Dossier.Dossierdata.Recordset.Bookmark = Dossier.Dossierdata.Recordset.LastModified encour = Dossier.Dossierdata.Recordset.LastModified 'afin de récupérer le bookmark de mon premier controle data Unload Dossier
UserForm2: 'positionnement du deuxième controle data DossierData Missions.Dossierdata.Recordset.Update While Missions.Dossierdata.Recordset.Bookmark = encour Missions.Dossierdata.Recordset.MoveNext Wend
Voilà, quelqu'un pourrait-il m'aider ? Peut-être aussi ne suis-je pas obliger de recréer un controle data alors que j'en ai déjà un dans mon premier user form. Est-ce possible de l'utiliser depuis un autre user form, comme si il était Global en quelque sorte ?)
Marsh Posté le 21-04-2004 à 09:29:09
Bonjour,
J'ai créé un controle data lié à une table dans un userform.
Quand je ferme le userform (unload) j'en appelle un autre ou j'ai là aussi crée un controle data lié à la même table. J'aimerai retrouver dans le deuxième userform l'enregistrement sur lequel j'étais dans le premier. comment dois-je faire ?
Dois-je me récupérer le bookmark (je ne suis pas sur de bien comprendre cette notion) du premier et ensuite le passer à mon deuxième controle data ?
J'avais écrit le code suivant qui ne marche pas bien sur mais qui peut vous éclairer sur ce que je veux faire:
UserForm1:
Dossier.Dossierdata.Recordset.Update
Dossier.Dossierdata.Recordset.Bookmark = Dossier.Dossierdata.Recordset.LastModified
encour = Dossier.Dossierdata.Recordset.LastModified
'afin de récupérer le bookmark de mon premier controle data
Unload Dossier
UserForm2:
'positionnement du deuxième controle data DossierData
Missions.Dossierdata.Recordset.Update
While Missions.Dossierdata.Recordset.Bookmark = encour
Missions.Dossierdata.Recordset.MoveNext
Wend
Voilà, quelqu'un pourrait-il m'aider ?
Peut-être aussi ne suis-je pas obliger de recréer un controle data alors que j'en ai déjà un dans mon premier user form. Est-ce possible de l'utiliser depuis un autre user form, comme si il était Global en quelque sorte ?)
Merci Bcp.
KilKenny