Discussion :

[tedparker]

Bonjour,

ptite question toute simple. Comment fait-on, par le code, pour changer la source d'un graphique, c'est à dire la requête SQL à exécuter ?
Mon graphique aura des paramètres modifiables par un utilisateur et dc sur clic je voudrais modifier la requête pour ce graphique.

Merci

[ActionAccess]

Bonjour,

Le plus simple à mon avis est de modifier l'instruction SQL de la requête qui est la source du graphique avec les paramètres définis par l'utilisateur, puis de lancer le formulaire ou l'état contenant le graphique. Le graphique se base toujours sur le même nom de requête, ici, "Source Graphique". Ainsi, pas besoin d'ouvrir le formulaire ou l'état en mode Design.

Code :

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

1
2
3
4
5
6
7
8
'Efface l'ancienne requête et sauvegarde la nouvelle :
Dim qdfLoop2 As DAO.QueryDef
    For Each qdfLoop2 In CurrentDb.QueryDefs
        If qdfLoop2.Name Like "Source Graphique" Then
        CurrentDb.QueryDefs.Delete qdfLoop2.Name
        End If
    Next qdfLoop2
Set QDF = CurrentDb.CreateQueryDef("Source Graphique", Var_Source)

Var_Source est l'instruction SQL de la requête. C'est à toi de la créer selon les paramètres choisis par l'utilisateur.

J'ai choisi l'option de supprimer puis de recréer la requête, mais on aurait aussi pu utiliser la propriété SQL de la requête.

Code :

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

qdfLoop2.SQL = Var_Source

Espérant avoir répondu à la question,

Cdlt,

[catoucat]

Ou sinon changer directement sur le code du formulaire mais c'est peut-etre moins rigoureux que la solution proposee par ActionAccess, par exemple:

Code :

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

    Me.Chart_Year.RowSource = "TRANSFORM Sum([SumQuantity]) AS [SumOfQuantity] SELECT (Format([Month],'MM/YY')) FROM [Q_Chart_Year] WHERE Format([Month],'YYYY')=" & YearWanted.Value & " GROUP BY (Year([Month])*12 + Month([Month])-1),(Format([Month],'MM/YY')) PIVOT [Team];"

(et dans les proprietes du graphique tu mets une table bidon avec rien dedans pour qu'il mette pas 30 ans a charger le formulaire avec les anciennes valeurs)