BJR,
j'ai un probleme au niveau de mon code vba, je filtrer mon formulaire en ne prenant que les criteres selectionnés dans le formulaire et extraire les données de la base et l'exporter sur un fichier EXCEL voici mon code
-------------------
-------------------------------------
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Private Sub cmdOK_Click() Dim vItem As Variant Dim strWhere, strWhereAnnee, strWhereSupport As String Dim strWhereCampagne, strWhereSousbranche As String DoCmd.OpenQuery "Pige", acViewNormal, acReadOnly ....................................(filtre support,filtre campagne) .................................... DoCmd.ApplyFilter , "Support = " & strWhereSupport & " Campagne= " & strWhereCampagne & "" DoCmd.OutputTo acQuery, "Pige", acFormatXLS, , True, "", 0 DoCmd.Close acQuery, "Pige"
l'execution s'arrete à la ligne (DoCmd.ApplyFilter , "Support...) et le msg d'erreur et le suivant:
Erreur d'éxécution'3075'
Erreur de syntaxe (opérateur absent) dans l'expressionCe msg d'erreur que le filtre marche et a fait l'extraction du support et de la campagne selectionnée dans le formulaire mais l'erreur est dans la syntaxe de( DoCmd.ApplyFilter )"Support=[Support] In ('TF1') AND Campagne = [Campagne] In ('COCA COLA') AND "
DE L'aide SVP
AIDEZ MOI!!!!!!!!!!!!
Partager