Selection de données dynamiques pour un graphe
Bonjour à tous et à toutes,
Je viens vers vous, car j ai souci avec la sélection de donnée pour un graphique, pour etre plus précis , je suis en rain de mettre en place un fichier avec des données et j aimerai faire des graphiques issus de ses données, j ai donc deux cellules avec des listes déroulantes qui representes des dates de début et des dates de fin, j aimerai savoir avec un formule je peux à partir des dates figurants dans les onglets Graph (C5 et F5) avoir une formule qui sélectionne automatiquement les valeurs de la plage concernée (colonne B et F de l'onglet Données) pour pour faire un graphique
merci
en pièces jointes vous avez un fichier exemple
Bonjour Blackswan,
voyez si la solution proposée en PJ vous convient
Bonjour Blackswan,
voyez si la solution proposée en PJ vous convientBlackswan-gaph.xlsx
Bonjour njhub et merci pour la reaction mais le resultat ne me convient pas, en fait das un onglet je vais vaire une dizaine de graphe , j avais besoin que la formule selection les plages, des colonnes dates et cac 40 clôture, par le passé j avais utilisé cette formule
=DECALER('CAC 40'!$D$19;EQUIV(DATE(ANNEE(AUJOURDHUI())-3;1;1);'CAC 40'!$B$19:$B$2100;1);;DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI())-1;31)-DATE(ANNEE(AUJOURDHUI())-2;1;1)) sur un autre fichier en me basant sur la date du jour la j essaie de l adapter et ça ne passe pas
Bonjour,
Une proposition TCD à étudier.
Cdlt.
Option Explicit
Dim pt As PivotTable
Dim pf As PivotField
Public Sub FilterData()
Application.ScreenUpdating = False
Set pt = ActiveSheet.PivotTables(1)
Set pf = pt.PivotFields("Date")
pf.ClearAllFilters
pf.PivotFilters.Add _
Type:=xlDateBetween, _
Value1:=CStr([A3]), _
Value2:=CStr([B3])
Set pt = Nothing: Set ws = Nothing
End Sub
Public Sub ResetFilter()
Application.ScreenUpdating = False
Set pt = ActiveSheet.PivotTables(1)
Set pf = pt.PivotFields("Date")
pf.ClearAllFilters
[A3].Value = ""
[B3].Value = ""
Set pf = Nothing: Set pt = Nothing
End SubBonjour,
Une proposition TCD à étudier.
Cdlt.
gaph.xlsb
Option Explicit Dim pt As PivotTable Dim pf As PivotField Public Sub FilterData() Application.ScreenUpdating = False Set pt = ActiveSheet.PivotTables(1) Set pf = pt.PivotFields("Date") pf.ClearAllFilters pf.PivotFilters.Add _ Type:=xlDateBetween, _ Value1:=CStr([A3]), _ Value2:=CStr([B3]) Set pt = Nothing: Set ws = Nothing End Sub Public Sub ResetFilter() Application.ScreenUpdating = False Set pt = ActiveSheet.PivotTables(1) Set pf = pt.PivotFields("Date") pf.ClearAllFilters [A3].Value = "" [B3].Value = "" Set pf = Nothing: Set pt = Nothing End Sub
merci Jean Eric mais je n'ai pas le droit de faire des macros dans le fichier
Bonjour,
2 exemples supplémentaires pour appréhender la chose.
Cdlt.
gaph.xlsb
merci pour ta réaction, mais je vois toujours la macro, pour ton detailler un peu plus mon souci, dans l'onglet Graph on a une liste déroulante qui va prendre ses données dans la colonne B (date) de l onglet données que tu as mis en forme et représentera l abscisse du graphe, l'ordonnée sera la colonne F de la feuille donnée, j aimerai que la liste deroulante sélection pour la date de début et de fin les données correspondantes, j avais une formule automatique qui marchait bien qui etait alignée sur la date du jour mais la la elle déconne la voici
DECALER('CAC 40'!$B$19;EQUIV(DATE(ANNEE(AUJOURDHUI())-3;1;1);'CAC 40'!$B$19:$B$2100;1);;DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI())-1;31)-DATE(ANNEE(AUJOURDHUI())-2;01;01))
merci
Bonjour à tous
Une solution avec une colonne supplémentaire : actualiser le TCD quand on modifie la plage de dates
Une autre avec la méthode classique de DECALER
NB : je ne peux pas non plus ouvrir le dernier fichier de Jean-Eric
Edit : le format xlb pose problème. xlsx joint
RE
A priori les tableaux ou les TCD sont incompatibles avec le format xlsb.
J'ai du tout refaire...
Pièce jointe à mon post, modifiée...
Bonjour,
voir pj avec deux feuilles : une ou on affiche les données avant de faire le graph
une ou on utilise directement les données : dans ce dernier cas le graphe "tombe" en fin de la période qui se termine au 31/03 car il y a un div0 sur les 30 et 31 mars
Cordialement
Bonjour,
voir pj avec deux feuilles : une ou on affiche les données avant de faire le graph
une ou on utilise directement les données : dans ce dernier cas le graphe "tombe" en fin de la période qui se termine au 31/03 car il y a un div0 sur les 30 et 31 mars
Cordialement
Merci DUG59 j'ai testé la formule 2 et cela marche parfaitement sur mon fichier final
Re
Je note que j'ai bossé pour rien !
Re,
Même remarque que 78Chris.
Et en plus, je note que la proposition de Deug59, est basée sur le même principe, mais postée bien plus tard...
Cdlt.
Bonjour,
Dois-je comprendre de ne pas intervenir dans des fils auxquels vous avez déjà donné une réponse ?
Re,
Ce message ne t'est pas addressé.
Et je n'ai pas pour habitude d'empêcher quiconque d'intervenir sur un sujet.
Cdlt.
Re
Je note que j'ai bossé pour rien !
Bonjour à tous et merci pour vos reactions toutes vos solutions sont correctes , je trouvais juste que celle de DUG59 et plus courte, c'est tout, en plus toute vos contributions sont visibles sur le forum et les solutions ^proposées par Chris78 et Jean Eric seront certainement idoine pour d'autres membres dans leur souci de formule. merci encore à vous