Discussion :

[jojoboloss]

Bonjour,

J'aimerais en VBA pouvoir ajouter un champ a une table liee. J'ai recupere le code sur le FAQ du site, mais un message d'erreur me dit que cette fonction ne marche pas pour des tables liees:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Sub addDefault () 
    Dim fldDate As Field
    Set fldDate = CurrentDb.TableDefs!Clients.CreateField("DateSignature",dbDate) 
    fldDate.DefaultValue= "Now()" 
    CurrentDb.TableDefs("Clients").Fields.Append fldDate 
End Sub

Quelqu'un aurait une solution pour contourner ce probleme??

Merci par avance pour votre precieuse aide!

a+

[random]

on ne touche pas aux tables lièes

en cas de besoin
on crée une table locale reprenant la clef de la table liée et les données complémentaires