Discussion :

[prissou91]

Bonjour à toutes et à tous,

Je bloque sur un petit problème.

Je souhaite créer un bon de commande ayant pour source trois tables :
Commandes [IDcommande, Datecde, Type, idFournisseurs]
Lignedecommande [IDcommande, lignecde, idprod,qte]
Produits [idprod,nomprod,type,prix...]

J'aimerais, dans le formulaire, selectionner le type de produit qui filtre automatique dans le sous-formulaire uniquement les produits correspondant à ce type.

Comment je dois faire ? Peut-etre dois-je passer par une requete ?

Merci bcp pour votre aide.

Bonne journée

[Gado2600]

Bonjour,
Orientes toi le VBA dans le style :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Dim stfiltre As String
    stfiltre = ""
 
    ' On créé le premier filtre
    If Not IsNull(Me.controle1.Value) Then
        stfiltre = "[Champs_1] LIKE '*" & Me.controle1.Value & "*'"
    End If
 
    ' On créé le deuxième filtre
    If Not IsNull(Me.controle2.Value) Then
        If stfiltre <> "" Then
            stfiltre = stfiltre & " AND "
        End If
        stfiltre = stfiltre & "[Champs_2] LIKE '*" & Me.controle2.Value & "*'"
    End If
 
    ' etc...
 
    ' On active ou non le filtre
    If stfiltre <> "" Then
        Me.Filter = stfiltre
        Me.FilterOn = True
    Else
        Me.FilterOn = False
    End If

Ceci étant à mettre dans le sous-formulaire pour utiliser "Me".
A toi de l'adapter pour faire du filtrage à partir d'un formulaire vers un sous-formulaire.

Cordialement,

[ClaudeLELOUP]

Bonjour,

Tu peux aussi jeter un œil sur cet article.