Pré remplir champs formulaire par vba AccessRésolu/Fermé

Question

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

Configuration: Windows 7 / Internet Explorer 9.0

yofa · Answer

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

Pré remplir champs formulaire par vba Access

1 réponse

Discussions similaires

Newsletters