Bonjour a toutes et a tous,
Je dois faire une retrodocumentation d'une base= faire la liste des tables
qui sont sources de donnees pour les combo des formulaires.
J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires:
Set ctr = CurrentDb.Containers!Forms
For Each doc In ctr.Documents
etc...
mais l'objet Document n'est pas un objet Form et je ne peux pas parcourir
les Controls par un For each.
Une solution est d'ouvrir le formulaire correspondant au Document
(DoCmd.OpenForm doc.Name), mais ceci declenche les evenements Form_Load,
Form_Current,... et engendre des messages d'erreur.
Question1:
Comment atteindre l'objet Form sans l'ouvrir?
Question2:
Comment inhiber les evenements Form_... ?
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
3stone
Salut,
"TiMike45" | Je dois faire une retrodocumentation d'une base= faire la liste des tables | qui sont sources de donnees pour les combo des formulaires. | J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires: | Set ctr = CurrentDb.Containers!Forms | For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object For Each oFrm In CurrentProject.AllForms debug.print oFrm.Name Next oFrm
"TiMike45"
| Je dois faire une retrodocumentation d'une base= faire la liste des tables
| qui sont sources de donnees pour les combo des formulaires.
| J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires:
| Set ctr = CurrentDb.Containers!Forms
| For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object
For Each oFrm In CurrentProject.AllForms
debug.print oFrm.Name
Next oFrm
"TiMike45" | Je dois faire une retrodocumentation d'une base= faire la liste des tables | qui sont sources de donnees pour les combo des formulaires. | J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires: | Set ctr = CurrentDb.Containers!Forms | For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object For Each oFrm In CurrentProject.AllForms debug.print oFrm.Name Next oFrm
oFrm n'est pas un objet Form mais AccessObject donc toujours pas acces aux Controls Autre idee? Merci -- TiMike
Salut,
"TiMike45" | Je dois faire une retrodocumentation d'une base= faire la liste des tables | qui sont sources de donnees pour les combo des formulaires. | J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires: | Set ctr = CurrentDb.Containers!Forms | For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object For Each oFrm In CurrentProject.AllForms debug.print oFrm.Name Next oFrm
oFrm n'est pas un objet Form mais AccessObject
donc toujours pas acces aux Controls
Autre idee?
Merci
--
TiMike
Salut,
"TiMike45"
| Je dois faire une retrodocumentation d'une base= faire la liste des tables
| qui sont sources de donnees pour les combo des formulaires.
| J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires:
| Set ctr = CurrentDb.Containers!Forms
| For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object
For Each oFrm In CurrentProject.AllForms
debug.print oFrm.Name
Next oFrm
oFrm n'est pas un objet Form mais AccessObject donc toujours pas acces aux Controls Autre idee? Merci -- TiMike
Salut,
"TiMike45" | Je dois faire une retrodocumentation d'une base= faire la liste des tables | qui sont sources de donnees pour les combo des formulaires. | J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires: | Set ctr = CurrentDb.Containers!Forms | For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object For Each oFrm In CurrentProject.AllForms debug.print oFrm.Name Next oFrm
MZTools devrait faire ton affaire. Faire une recherche avec Google. quand MZTools sera installé, tu vas sur le bouton "Autre utilitaire" et ensuite "générer documentation XML"
"TiMike" a écrit dans le message de news:
oFrm n'est pas un objet Form mais AccessObject donc toujours pas acces aux Controls Autre idee? Merci -- TiMike
Salut,
"TiMike45" | Je dois faire une retrodocumentation d'une base= faire la liste des tables
| qui sont sources de donnees pour les combo des formulaires. | J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires:
| Set ctr = CurrentDb.Containers!Forms | For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object For Each oFrm In CurrentProject.AllForms debug.print oFrm.Name Next oFrm
MZTools devrait faire ton affaire.
Faire une recherche avec Google. quand MZTools sera installé, tu vas sur le
bouton "Autre utilitaire" et ensuite "générer documentation XML"
"TiMike" <TiMike@discussions.microsoft.com> a écrit dans le message de
news:D87CEE5D-AAD5-4064-8B62-FF0A0C4C25F9@microsoft.com...
oFrm n'est pas un objet Form mais AccessObject
donc toujours pas acces aux Controls
Autre idee?
Merci
--
TiMike
Salut,
"TiMike45"
| Je dois faire une retrodocumentation d'une base= faire la liste des
tables
| qui sont sources de donnees pour les combo des formulaires.
| J'ai trouve sur ce groupe la methode pour obtenir la liste des
formulaires:
| Set ctr = CurrentDb.Containers!Forms
| For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object
For Each oFrm In CurrentProject.AllForms
debug.print oFrm.Name
Next oFrm
MZTools devrait faire ton affaire. Faire une recherche avec Google. quand MZTools sera installé, tu vas sur le bouton "Autre utilitaire" et ensuite "générer documentation XML"
"TiMike" a écrit dans le message de news:
oFrm n'est pas un objet Form mais AccessObject donc toujours pas acces aux Controls Autre idee? Merci -- TiMike
Salut,
"TiMike45" | Je dois faire une retrodocumentation d'une base= faire la liste des tables
| qui sont sources de donnees pour les combo des formulaires. | J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires:
| Set ctr = CurrentDb.Containers!Forms | For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object For Each oFrm In CurrentProject.AllForms debug.print oFrm.Name Next oFrm
Bonsoir, MZTools est tres bien, mais il ne liste pas les controles des formulaires, et encore moins leurs proprietes. Une idee pour bloquer les evenements Form_Load, Form_Open, Form_Current, ...? Merci
"Jacques" a écrit dans le message de news:
Bonjour,
MZTools devrait faire ton affaire. Faire une recherche avec Google. quand MZTools sera installé, tu vas sur le
bouton "Autre utilitaire" et ensuite "générer documentation XML"
"TiMike" a écrit dans le message de news:
oFrm n'est pas un objet Form mais AccessObject donc toujours pas acces aux Controls Autre idee? Merci -- TiMike
Salut,
"TiMike45" | Je dois faire une retrodocumentation d'une base= faire la liste des tables
| qui sont sources de donnees pour les combo des formulaires. | J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires:
| Set ctr = CurrentDb.Containers!Forms | For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object For Each oFrm In CurrentProject.AllForms debug.print oFrm.Name Next oFrm
Bonsoir,
MZTools est tres bien, mais il ne liste pas les controles des formulaires,
et encore moins leurs proprietes.
Une idee pour bloquer les evenements Form_Load, Form_Open, Form_Current,
...?
Merci
"Jacques" <jac_be@hotmail.com> a écrit dans le message de
news:uIR90oC0FHA.2348@TK2MSFTNGP15.phx.gbl...
Bonjour,
MZTools devrait faire ton affaire.
Faire une recherche avec Google. quand MZTools sera installé, tu vas sur
le
bouton "Autre utilitaire" et ensuite "générer documentation XML"
"TiMike" <TiMike@discussions.microsoft.com> a écrit dans le message de
news:D87CEE5D-AAD5-4064-8B62-FF0A0C4C25F9@microsoft.com...
oFrm n'est pas un objet Form mais AccessObject
donc toujours pas acces aux Controls
Autre idee?
Merci
--
TiMike
Salut,
"TiMike45"
| Je dois faire une retrodocumentation d'une base= faire la liste des
tables
| qui sont sources de donnees pour les combo des formulaires.
| J'ai trouve sur ce groupe la methode pour obtenir la liste des
formulaires:
| Set ctr = CurrentDb.Containers!Forms
| For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object
For Each oFrm In CurrentProject.AllForms
debug.print oFrm.Name
Next oFrm
Bonsoir, MZTools est tres bien, mais il ne liste pas les controles des formulaires, et encore moins leurs proprietes. Une idee pour bloquer les evenements Form_Load, Form_Open, Form_Current, ...? Merci
"Jacques" a écrit dans le message de news:
Bonjour,
MZTools devrait faire ton affaire. Faire une recherche avec Google. quand MZTools sera installé, tu vas sur le
bouton "Autre utilitaire" et ensuite "générer documentation XML"
"TiMike" a écrit dans le message de news:
oFrm n'est pas un objet Form mais AccessObject donc toujours pas acces aux Controls Autre idee? Merci -- TiMike
Salut,
"TiMike45" | Je dois faire une retrodocumentation d'une base= faire la liste des tables
| qui sont sources de donnees pour les combo des formulaires. | J'ai trouve sur ce groupe la methode pour obtenir la liste des formulaires:
| Set ctr = CurrentDb.Containers!Forms | For Each doc In ctr.Documents
Regarde la collection AllForms !
Dim oFrm As Object For Each oFrm In CurrentProject.AllForms debug.print oFrm.Name Next oFrm
