Problème type field : dbText ou rien

J'ai intégré le paramètre "chaine vide autorisée" à un champ type nunérique. "chaine" incompatible avec "numérique" => Eurêka!
Encore merci pour ton aide!

Ok, je vais faire ça et je reviens.
Cela dit, il suffit que je mette dbtext et tout fonctionne. Je n'ai pas précisé que j'ai réessayé sur une table vierge au cas où la table d'origine avait un problème ou une restriction qui m'avait échappé.

Pardon,
J'ai juste oublié la ligne end sub après end select.
Basic c'est pour préciser que c'est du VBA, j'imagine. J'y penserai la prochaine fois.
Merci de ton aide.

Bonjour Yg_be et merci de ton aide,

Ça fait plaisir de voir une communauté prête à aider!

Private Sub basMacro1()

On Error GoTo err
    Dim oDb As DAO.Database
    Dim otbl As DAO.TableDef
    Dim ofld As DAO.Field
    Set oDb = CurrentDb
    Set otbl = oDb.TableDefs("table1")
    'Etape 1 : Créer le champ
    Set ofld = otbl.CreateField("au" & Date)
    'Etape 2 : Définit les propriétés
    ofld.Type = dbNumeric
    ofld.AllowZeroLength = True 'Chaine vide autorisée : oui
    ofld.Required = False         'Null interdit : non
    'Etape 3 : Ajout du champ à la table
    otbl.Fields.Append ofld
    'Rafraichit la collection
    otbl.Fields.Refresh
    MsgBox ofld.Name
    'suppression champ
    otbl.Fields.Delete ofld.Name
Exit Sub
err:
    Select Case err.Number
    'Si impossible de trouver l'élément dans la collection
    Case 3265
        MsgBox "impossible de trouver ta table: " & strT_archiveshdv
    Case 3010, 3191
        MsgBox "Le champ " & Date & " existe déjà"
    Case Else: MsgBox "Erreur inconnue. Avez-vous fermé la table?"
    End Select

J'ai essayé createfield(nom,type) aussi mais sans succès.
Je pensais que c'était à cause de la date dans le nom du champ mais en la supprimant ça ne fonctionne pas non plus.
Je n'ai plus d'idée…

bonjour, plutôt:
https://forums.commentcamarche.net/forum/affich-8352936-access-vba-probleme-type-field

Peux-tu partager ton code?