paramètrer les colonnes d'une table en VBA
Bonjours,
je crée une table en VBA de la façon ci dessous :
Mais a l'affichage la table s'affiche avec des largeurs de colonne standards de access. J'aimerai pouvoir donner une largeur différentes à la création de la table, pour avoir un affichage à l'ouverture que je n'ai pas a modifier.
est-ce possible?:roll:
Code:
1 2 3 4 5 6 7 8 9 10
| Set tbl = Db.CreateTableDef("tempo") 'Création d'une table
Set fld = tbl.CreateField("Champ1", dbText) 'création du champ désignation
fld.OrdinalPosition = 1 'champ position 1
fld.Size = 20 'taille 10 caractères
tbl.Fields.Append fld 'ajout du champ dans la table
Set fld = tbl.CreateField("Champ2", dbText) 'création du champ Item
fld.OrdinalPosition = 2 'champ position 2
fld.Size = 50 'taille 10 caractères
tbl.Fields.Append fld 'ajout du champ dans la table |
etc. etc.
Merci