Auteur

MVP Office Access 2003, 2004, 2005 et 2006

Codes pour Access

Base de données

Administrateur

Table

º Exporter structure
º Lister les tables dans une table

Lister les tables dans une variable
º NumAuto Perso
º Supprimer une table externe
º Tester l'existence d'une table
º Tester l'existence d'une table externe

Requête

Formulaire

Dates & Heures

Nombre

Math

Fichier

Commandes externes

Automation

Equivalence

Tuto Access 2007

Base de données

Lettre d'information

Table - Lister les tables dans une variable

Description

		Cette fonction permet de sauvegarder dans une variable le nom de toutes les tables de la base de données en cours ou d'une base de données externe.

Synthaxe

LstTableInVariable (strBase)

La synthaxe de la fonction LstTableInVariable comprend les éléments suivants :

Eléments	Description
strBase	Expression de chaîne correspondant au nom de la base de données pour laquelle on souhaite lister les tables.

Exemple

		Aucun exemple disponible pour le moment.

Code de la fonction

Dim tabNomTable() As String
Function LstTableInVariable(strBase As String)

Dim db As Database
Dim intTable As Integer
Dim tdf As TableDef
Set db = OpenDatabase(strBase)
intTable = 0
ReDim tabNomTable(db.TableDefs.Count)
For Each tdf In db.TableDefs
intTable = intTable + 1
tabNomTable(intTable) = tdf.Name
Next
db.Close: Set db = Nothing

End Function

Date de création : 21/09/2006 @ 20:51
Dernière modification : 21/09/2006 @ 23:51
Catégorie : Table
Page lue 1024 fois

Prévisualiser la page Imprimer la page