Tilføj felt i sammenkædet tabel

Jeg skal have tilføjet et nyt felt til en eksisterende tabel i min backend database, hvor tabellerne ligger. Det skal gøres fra frontend af databasen, men når jeg prøver, får jeg at vide at metoden ikke virker på sammenkædede tabeller. Er dr nogen som kender en metode som kan bruges?

Sådan her ser den ud:

Function AddField()

    Dim db As Database
    Dim prp As Property
    Dim tdef As TableDef
    Set db = CurrentDb
    Set tdef = db.TableDefs("Test")
    Set prp = tdef.Fields("NyDato").CreateProperty("Format", 10, "Short Date")
    tdef.Fields("NyDato").Properties.Append prp

End Function