Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Dictionnaire de données ?

Dictionnaire de données ?

16 réponses
Avatar
slyzen
Comment extraire un dico des donn=E9es d'une base ? Je ne=20
trouve pas de fonction de r=E9pertoire de donn=E9es dans=20
Access, =E7a m'=E9tonne qu'il n'y est rien de pr=E9vu pour =E7a...
Signaler un problème avec ce contenu

10 réponses

Supprimer
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
1 2
Avatar
Raymond [mvp]
Bonjour aussi.

ne serais-tu pas le Jush d'hier ? as-tu testé la procédure avec tes données
en plus ?

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"slyzen" a écrit dans le message de
news:287c501c464f9$3042b950$
Comment extraire un dico des données d'une base ? Je ne
trouve pas de fonction de répertoire de données dans
Access, ça m'étonne qu'il n'y est rien de prévu pour ça...
Avatar
slyzen
Salut raymond,

non je ne suis pas jush mais j'ai trouvé ta réponse à son
msg. Je ne suis pas trés avancé en vba et je ne sais ou
coller ta proc pour qu'elle fonctionne. Dans un module,
la référence à "Me" est incorrecte...

Si je modifie les références à Me, ça fonctionne mais ça
ne fait que de me créer la table _ListeDesChamps
contenant sa propre description (2 lignes donc)..
Avatar
Raymond [mvp]
RE.

excuses pour la confusion mais ça ressemblait.
tu mets la procédure sur l'événement click d'un bouton par exemple dans un
formulaire dans ton appli.
Tu voudrais quoi exactement ? car il ne faut pas oublier qu'il existe la
documentation sous access (papier)
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"slyzen" a écrit dans le message de
news:29bfb01c46500$20493310$
Salut raymond,

non je ne suis pas jush mais j'ai trouvé ta réponse à son
msg. Je ne suis pas trés avancé en vba et je ne sais ou
coller ta proc pour qu'elle fonctionne. Dans un module,
la référence à "Me" est incorrecte...

Si je modifie les références à Me, ça fonctionne mais ça
ne fait que de me créer la table _ListeDesChamps
contenant sa propre description (2 lignes donc)..
Avatar
slyzen
oui, je viens de découvrir la fonction de documentation,
c'est exactement ce qu'il me fallait.. enfin dommage la
description ne soit que sous forme d'état et non sous
forme de table mais c'est déjà ça...

merci encore pour ton aide !!
Avatar
Jessy Sempere [MVP]
Bonjour

Une fois que ton état de documentation est ouvert, fais un click droit dessus,
normalement tu dois avoir l'option "Envoyer", cette d'option te permet
d'envoyer cet état par mail sous différents format (excel, text, ...)

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"slyzen" a écrit dans le message news:
2895101c46504$82c01f00$
oui, je viens de découvrir la fonction de documentation,
c'est exactement ce qu'il me fallait.. enfin dommage la
description ne soit que sous forme d'état et non sous
forme de table mais c'est déjà ça...

merci encore pour ton aide !!
Avatar
Raymond [mvp]
Bonjour Jessy.

prêt pour le we ?

sauf que c'est inexploitable derrière même sous le format excel.
Il va falloir qu'on s'y mette pour créer une table.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jessy Sempere [MVP]" a écrit dans le message de
news:cclgvu$jpu$
Bonjour

Une fois que ton état de documentation est ouvert, fais un click droit
dessus,

normalement tu dois avoir l'option "Envoyer", cette d'option te permet
d'envoyer cet état par mail sous différents format (excel, text, ...)

@+
Jessy Sempere - Access MVP


Avatar
Jessy Sempere [MVP]
Et oui, c'est en cours, je tiens au courant... ;-)

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Raymond [mvp]" a écrit dans le message news:

Bonjour Jessy.

prêt pour le we ?

sauf que c'est inexploitable derrière même sous le format excel.
Il va falloir qu'on s'y mette pour créer une table.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jessy Sempere [MVP]" a écrit dans le message de
news:cclgvu$jpu$
Bonjour

Une fois que ton état de documentation est ouvert, fais un click droit
dessus,

normalement tu dois avoir l'option "Envoyer", cette d'option te permet
d'envoyer cet état par mail sous différents format (excel, text, ...)

@+
Jessy Sempere - Access MVP







Avatar
Jessy Sempere [MVP]
Ok voilà ce qu'il en ressort...

Etapes :
1°) Lancer l'analyse de documentation pour créer l'état d'Access
2°) Laisser l'état ouvert et exécuter la fonction qui suit
3°) Le résultat se trouve dans la table TableTemporaire (se nom est
un argument de la fonction donc vous pouvez mettre ce que vous
voulez...

Code :
**************************************************
Function Exe_ImportDoc()
ImportDoc "TableTemporaire"
End Function

Function ImportDoc(strTblDest As String)
On Error GoTo ErrImportDoc

Dim strRst As String
Dim strFile As String

With Application.FileSearch
.NewSearch
.LookIn = "c:"
.SearchSubFolders = True
.Filename = "wztool*.mde"
.MatchTextExactly = True
.FileType = msoFileTypeAllFiles
If .execute > 0 Then strFile = .FoundFiles(1)
End With

DoCmd.DeleteObject acTable, strTblDest

strRst = "SELECT * INTO " & strTblDest & _
" FROM doc_qrySaveAsTableSrc IN '" & strFile & "';"
CurrentDb.execute strRst

MsgBox "La table " & strTblDest & " vient d'être créée..."
Exit Function

ErrImportDoc:
If Err.Number = 3011 Then
Resume Next
Else
MsgBox "Erreur n° " & Err.Number & vbCrLf & Err.Description, vbCritical
End If

End Function
**************************************************
--
@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Jessy Sempere [MVP]" a écrit dans le message news:
cclkm0$m52$
Et oui, c'est en cours, je tiens au courant... ;-)

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Raymond [mvp]" a écrit dans le message news:

Bonjour Jessy.

prêt pour le we ?

sauf que c'est inexploitable derrière même sous le format excel.
Il va falloir qu'on s'y mette pour créer une table.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jessy Sempere [MVP]" a écrit dans le message de
news:cclgvu$jpu$
Bonjour

Une fois que ton état de documentation est ouvert, fais un click droit
dessus,

normalement tu dois avoir l'option "Envoyer", cette d'option te permet
d'envoyer cet état par mail sous différents format (excel, text, ...)

@+
Jessy Sempere - Access MVP











Avatar
Raymond [mvp]
Hé bien tu vois quand tu veux ! tu auras la médaille de chocolat de MPFA.

petite remarque: remplacer msoFileTypeAllFiles par 1 pour éviter de cocher
la référence Office, toi qui n'aimes pas les constantes énumérées.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jessy Sempere [MVP]" a écrit dans le message de
news:cclljq$mi4$
Ok voilà ce qu'il en ressort...


Avatar
Raymond [mvp]
RE.

j'ai essayé sur une base de 6 tables.

au bout de 2 minutes , toujours pas de réponses, "access ne répond pas"
indiqué dans la légende. ??

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jessy Sempere [MVP]" a écrit dans le message de
news:cclljq$mi4$
Ok voilà ce qu'il en ressort...


1 2