Citation:
J'avait compris pour le sous-formulaire, d'ailleurs la table auteur et la table livre recevais les donnes sans problemes, c'est la table intermediaire qui n'est pas updater... C'est la partie du boutton ajouter que je ne comprend pas...
|
Ce que moi j'ai fait c'est une liste déroulante avec le nom des auteurs. Puis un bouton ajouter cet auteur au livre courant.
Le bouton a comme code quelque chose qui ressemble a ceci
Code:
Private Sub cmdAjout_Click()
Dim dbsTest As Database
Dim rstIntersection As Recordset
Set dbsTest = CurrentDb
Set rstIntersection = dbsTest.OpenRecordset("IntLivreAuteur", dbOpenDynaset) <- La table intersection
With rstIntersection
.AddNew
!NoLivre = NoLivre <- Un champ du formulaire qui indique le livre courrant
!NoAuteur = NouvAuteur <- Le champs déroulant comportant tout les auteurs
.Update
End With
Form.Refresh
End Sub
Citation:
Merci de prendre le temps de m'aider
|
Ca me fait plaisir. C'est une bonne co-incidence puisque je suis justement en train de recommencer a faire du VBA a la job après plus de 5 ans a ne plus en faire. Donc ca me remet dans le bain.
Je joint un fichier .zip a ce message qui est la BD exemple que j'ai fait. En espèrant que ca t'aide.