Pré remplir champs formulaire par vba Access

Résolu/Fermé
yofa Messages postés 1093 Date d'inscription lundi 9 novembre 2009 Statut Membre Dernière intervention 1 mars 2013 - 6 avril 2012 à 10:02
yofa Messages postés 1093 Date d'inscription lundi 9 novembre 2009 Statut Membre Dernière intervention 1 mars 2013 - 6 avril 2012 à 11:08
Bonjour à tous,

J'essaie de creer une macro vba permettant de remplir un champs dans un formulaire lors de son ouverture.
Voici un exemple de code qui ne marche pas...

Sub ajoutmotformulaire()

Dim libelle As String

libelle = "lolilol"
DoCmd.OpenForm "AjoutMotcle", , , "LibelleCle =" & libelle, , acDialog, "LibelleCle =" & libelle

End Sub


Je cherche ici a ajouter le libelle "lolilol" dans le champs libellecle de mon formulaire AjoutMotcle

Quelqu'un aurait une idee pour faire fonctionner??

Merci

1 réponse

yofa Messages postés 1093 Date d'inscription lundi 9 novembre 2009 Statut Membre Dernière intervention 1 mars 2013 203
6 avril 2012 à 11:08
Je vais tout simplement me repondre...

Il faut ajouter un parametre openargs ( pour open arguments) à la fonction openform

DoCmd.OpenForm "AjoutMotcle", , , , , acDialog, libelle


puis dans le formulaire il faut ajouter une procedure evenementielle qui va recuperer le champs openargs passé en parametre pour l'ajouter au champs lors de l'ouverture...

Private Sub Form_Open(Cancel As Integer)
        
        Forms![AjoutMotcle]![LibelleCle] = Me.OpenArgs

End Sub

1