par , 10/06/2018 à 08h56 (1331 Affichages)
Appel d’un formulaire en mode ajout depuis un autre formulaire, voici comment le pré-remplir
Le formulaire appelant est frmSource dans lequel est ajouté un sous-formulaire frmSsForm et appelé frmCible
Considérant que l'appel de frmCible se fait en cliquant sur un bouton cmdOuvreCible et récupère l'id de la ligne active de frmSsForm on a le code suivant:
1 2 3 4 5
| Private Sub cmdOuvreCible_Click()
DoCmd.OpenForm "frmCible", acNormal, , , acFormAdd, OpenArgs:=Me.frmSsForm !id
End Sub |
Pour frmCible
1 2 3 4 5 6 7 8
| Private Sub Form_Load()
If Not IsNull(Me.OpenArgs) Then
DoCmd.GoToRecord , , acNewRec
Me.id = Me.OpenArgs
End If
End Sub |