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
Jessy SEMPERE
Bonjour
Je souhaiterais pouvoir faire un lisiting de tous les formulaires de ma base.
Tu peux utiliser l'utilitaire d'analyse d'access
ou alors tu peux passer par la collection Forms exemple : Dim db As DataBase, cnt As Container, doc As Document Set db = CurrentDb Set cnt = db.Containers("Forms") For Each doc In cnt.Documents debug.print doc.name Next
@+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------
Bonjour
Je souhaiterais pouvoir faire un lisiting de tous les formulaires de ma
base.
Tu peux utiliser l'utilitaire d'analyse d'access
ou alors tu peux passer par la collection Forms
exemple :
Dim db As DataBase, cnt As Container, doc As Document
Set db = CurrentDb
Set cnt = db.Containers("Forms")
For Each doc In cnt.Documents
debug.print doc.name
Next
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
Je souhaiterais pouvoir faire un lisiting de tous les formulaires de ma base.
Tu peux utiliser l'utilitaire d'analyse d'access
ou alors tu peux passer par la collection Forms exemple : Dim db As DataBase, cnt As Container, doc As Document Set db = CurrentDb Set cnt = db.Containers("Forms") For Each doc In cnt.Documents debug.print doc.name Next
@+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------
