Discussion :

[arawak]

Bonjour a tous!


je souhaiterais recuperer tous les noms des tables d'un base pour les afficher dans un combobox.

Quelqu'un pourrait t'il m'indiquer comment utiliser les objets containers pour recuperer les noms des tables.

encore merci.

BdD sous ACCESS 2003 enregistrée en ACCESS 2000 ref DAO.

[acama]

Ca peut peut être t'aider

Code :

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

1
2
3
4
5
6
7
 
Sub NomTable()
Set DB = CurrentDb
For Each TableV In DB.TableDefs
  MsgBox TableV.Name
Next
End Sub

Après reste plus qu'à en faire une liste pour ton combo

[acama]

Et ne pas tenir compte des tables qui commencent par "MSys" je suppose

[arawak]

MERCI beaucoup!

C'est tout a fait ce dont j'ai besion


A+ ;-)