Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 22/08/2011, 12h30   #1
Invité de passage
 
Inscription : mars 2007
Messages : 26
Détails du profil
Informations forums :
Inscription : mars 2007
Messages : 26
Points : 3
Points : 3
Par défaut remplir une zone de liste via une fonction

Bonjour,

J'ai un formulaire avec des zones de liste et un bouton.
Quand je clique sur le bouton (évènement sur clic) ca met à jour mes zones de listes via un code du genre :
Code :
1
2
3
4
Private Sub Commande119_Click()
Liste1.RowSource = "SELECT * FROM ......"
Liste1.Requery
End Sub
Jusque là tout fonctionne bien, sauf que quand je veux déplacer ce code dans une fonction, par exemple :
Code :
1
2
3
4
Public Sub test()
Liste1.RowSource = "SELECT * FROM ......"
Liste1.Requery
End Sub
et que j'appelle test dans Commande119_Click(), et ben ca fonctionne plus !
ca passe bien dans test puisque si je mets un Msgbox il s'affiche, si je modifie une zone de texte c'est bon aussi mais mes zones de listes rien, c'est normal ??
marinaetsonchat est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/08/2011, 12h57   #2
Invité de passage
 
Inscription : mars 2007
Messages : 26
Détails du profil
Informations forums :
Inscription : mars 2007
Messages : 26
Points : 3
Points : 3
pfff, j'ai trouvé : dans la clause WHERE de mon SELECT j'utilise une variable locale ...
faire une pause ca a du bon.
marinaetsonchat est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 09h39.


 
 
 
 
Partenaires

Hébergement Web