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 01/03/2011, 16h21   #1
Invité de passage
 
Inscription : mars 2011
Messages : 1
Détails du profil
Informations forums :
Inscription : mars 2011
Messages : 1
Points : 0
Points : 0
Par défaut zone de liste (contrôle de formulaire) envoyer la selection vers un autre formulaire

Bonjours! je m'appelle David et jai un petit (Gros ?) soucy surment un petit code en vba mais comme je 'y arrive pas je me tourne vers vous =) ...
le but etan de créé un formulaire "Client" ou lon verai tou les devis et loske je klike sur un devis cela mouvre un formulaire avec donc les données du devis =)
Lors de la creation jai donc mis en place une partie pour devis en format "zone de liste (contrôle de formulaire)" a la fin ce message etai indiquer et jai donc cocher ceci
http://images-2011.venusien.net/1_1298917922.jpg
Puis je voudrai ke en klikan deux fois sur cette zone noir ou lon voi le numero du devis
http://images-2011.venusien.net/2_1298917980.jpg
jarive au formulaire DU devis concerné
http://images-2011.venusien.net/3_1298918014.jpg

MERCI BEAUCOUP =D !!!
mrdave45 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 02/03/2011, 07h32   #2
Membre Expert
 
Inscription : août 2006
Messages : 1 435
Détails du profil
Informations forums :
Inscription : août 2006
Messages : 1 435
Points : 1 753
Points : 1 753
Bonjour,
cela peut se faire de cette façon
Code :
1
2
 
DoCmd.OpenForm "NomDuFormulaire",acNormal,,,,,Me!ListeDevis
Me!ListeDevis doit retourner le numéro du devis sélectionné
Le formulaire filtre sur la valeur passée en paramètre
Code :
1
2
3
4
5
 
Private Sub Form_Load()
 Me.Filter = "[Num]=" & OpenArgs
 Me.FilterOn = True
End Sub
helas est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 14h46.


 
 
 
 
Partenaires

Hébergement Web