Discussion :

[Mathusalem]

Bonjour à tous !


J'ai hérité d'une base de données Access avec des tables attachées de partout.

seul soucis, le gestionnaire d'attaches ne me permet pas de voir où elles sont attachée : le chemin sort de la fenêtre et il n'y a pas de scroll




savez vous comment je peux savoir vers quoi mes tables pointent ?


Merci !

[lanonyme]

Bonjour,

Dans Access, je sais pas, c'est vrai que c'est pas pratique

Je te propose un code VBA, listant le chemin de toutes tes tables attachées

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
 
Dim oDb As DAO.Database
Dim oTbl As DAO.TableDef
 
Set oDb = CurrentDb
'Pour chaque table
For Each oTbl In oDb.TableDefs
 'Si la table est liée alors afficher son nom
 If oTbl.Attributes And dbAttachedTable Then
    Debug.Print oTbl.Connect
 End If
Next oTbl

Cordialement,

lanonyme

[Mathusalem]

ça ne me renvoi rien du tout...

j'ai essayé comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Public Sub cheminTables()
Dim oDb As DAO.Database
Dim oTbl As DAO.TableDef
 
Set oDb = CurrentDb
'Pour chaque table
 
For Each oTbl In oDb.TableDefs
 
    Debug.Print oTbl.Name & " " & oTbl.Connect & " " & oTbl.SourceTableName
 
Next oTbl
End Sub

mais là encore, je ne récupère que les noms des tables

[Mathusalem]

c'est bon en fait, je testais pas sur la bonne base


merci