Discussion :

[elvisogo]

salut tout le monde je suis un debutant en vba access
voila mon objectif je execcute cette requete avec QueryDef et afficher le resultat grace a un bouton sur un formulaire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
SQl as string 
SQL ="SELECT matiere.[numeroMati], matiere.[filiereMati], matiere.[nomMati], matiere.(code), matiere.[credit]" & vbCrLf 
SQL =SQL & "FROM matiere" & vbCrLf 
SQL =SQL & "WHERE (((matiere.[filiereMati])=[taper le nombre ]));"

[madefemere]

Bonjour,

Le mieux est de créer un formulaire tabulaire ou à plusieurs éléments à partir de ta table matiere en mettant les 5 champs indiqués : [numeroMati], [filiereMati], [nomMati], [code], [credit].

Après, tu crées une zone de texte indépendant nommé disons txtNbFiliere qui va recevoir la valeur de [taper le nombre ] dans ta requête.

Ensuite tu crées ton bouton btnFiltre qui aura comme code sur Click :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub BtnFiltre_SurClick()
Me.Filter = "[filiereMati]=" & Me.txtNbFiliere 'Si filiereMati est un nombre. Sinon si c'est du texte utiliser la ligne suivante
'Me.Filter = "[filiereMati]=""" & Me.txtNbFiliere & """"
Me.FilterOn = True
Me.Requery
End Sub

Et tu as tes données filtrées. Il te faudrait rajouter je pense un bouton pour annuler le filtre. Fais une recherche en sélectionnant un mot et appuyant sur F1.

Cordialement,

[elvisogo]

je teste ce que tu me dit de faire cela va aider pour autre chose .
mais je précise que jai créer une requête(requet2) qui dépend de la requête si dessus et une autre(requet3) qui dépendant de la requet2 .
donc je cherchais a savoir comment exécuté en vba DAO cette requête et visualiser en même temps cette requête .
ce qui me permettra de l’adapter a mon problème .
au lieu de vous déranger pour tous sa , c'est plus dure à expliquer .
merci d'avance

[madefemere]

Bonjour,

Dans ce cas, je te conseille de lire les exemples dans la ICI pour les différentes manipulations d'une requête en VBA en attendant de plus amples explications.

Cordialement,