[access] données copiées entre 2 formulaires

Bonjour,

Pour ouvrir ton formulaire tu utilises une macro ou du code VBA ??

J'utilise un code VBA mais je peux une macro si il faut, je suis débutante, c'est ma première base.

Voilà le code que j'ai mis, mais je ne peux que ouvrir un nouveau formulaire, ça ne me recopie pas le "N° client" automatiquement :Private Sub ajouteranimaux_Click()
On Error GoTo Err_ajouteranimaux_Click

Dim stDocName As String

stDocName = "animaux"
DoCmd.OpenForm stDocName, , , , acFormAdd, acDialog, "GoToNew"

Exit_ajouteranimaux_Click:
Exit Sub

Err_ajouteranimaux_Click:
MsgBox Err.Description
Resume Exit_ajouteranimaux_Click

End Sub

Tant mieux je préfère le VBA

Sur l'évènement "Sur click" de ton bouton il faut ouvrir ton formulaire puis renseigner la valeur n° client

Docmd.openform "animaux"
[N° client] = forms![clients]![N° client]

Et voila c'est tout

J'avais déjà essayé, et je viens de reessayer, ça marche pas, le champ "N° client" reste vierge, par contre il est construit sous forme de liste déroulante qui m'affiche le nom du client, ça vient peut-être de là ?

Pour moi, "GoToNew" était pour aller à un nouvel enregistrement, mais je fais un peu au hasard ?????

En fait si tu as mis dans ton code

DoCmd.OpenForm stDocName, , , , acFormAdd, acDialog, "GoToNew"
[N° client] = forms![clients]![N° client]

Ca ne peut pas marcher car l'option acDialog bloque l'éxécution de la commande suivante [N° client] = forms![clients]![N° client]</gras>

Pour que ca fonctionne enlève acDialog

Il me répond "impossible d'attribuer une valeur à cet objet"

Cela m'étonne mais essai ca pour voir

forms![animaux]![N° client] = forms![clients]![N° client]

OK là ça marche, merci pour ton aide, c'est sympa.
Bonne journée