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?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
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