Graphique dynamique
Fermé
HEMIYELY
Messages postés
61
Date d'inscription
mercredi 10 mai 2017
Statut
Membre
Dernière intervention
25 janvier 2022
-
8 oct. 2018 à 15:24
via55 Messages postés 14403 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 24 avril 2024 - 19 oct. 2018 à 17:57
via55 Messages postés 14403 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 24 avril 2024 - 19 oct. 2018 à 17:57
A voir également:
- Graphique dynamique
- Tableau croisé dynamique - Guide
- Changer carte graphique - Guide
- Liste déroulante dynamique excel - Guide
- Graphique excel - Guide
- Graphique sparkline - Guide
7 réponses
via55
Messages postés
14403
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 avril 2024
2 703
8 oct. 2018 à 17:58
8 oct. 2018 à 17:58
Bonjour
Oui il faut passer par un code VBA de ce style :
Cdlmnt
Via
Oui il faut passer par un code VBA de ce style :
Sub pointilles()
sem = Format(Date, "WW")
ActiveSheet.ChartObjects("Graphique 1").Activate
ActiveChart.SeriesCollection(1).Select
With ActiveChart.SeriesCollection(1)
For i = 1 To .Points.Count
a = ActiveChart.SeriesCollection(1).XValues
With .Points(i).Border
If a(i) < sem Then .LineStyle = xlDash Else .LineStyle = xlContinuous
End With
Next
End With
End Sub
Cdlmnt
Via
DjiDji59430
Messages postés
4035
Date d'inscription
samedi 19 avril 2008
Statut
Membre
Dernière intervention
24 avril 2024
646
8 oct. 2018 à 17:58
8 oct. 2018 à 17:58
Bonjour,
Antérieur a quoi ?
Crdlmt
Antérieur a quoi ?
Crdlmt
HEMIYELY
Messages postés
61
Date d'inscription
mercredi 10 mai 2017
Statut
Membre
Dernière intervention
25 janvier 2022
9 oct. 2018 à 10:08
9 oct. 2018 à 10:08
Antérieur à la semaine actuelle. Ce qui fait que chaque semaine mon graphique change
danielc0
Messages postés
838
Date d'inscription
mardi 5 juin 2018
Statut
Membre
Dernière intervention
23 avril 2024
74
9 oct. 2018 à 11:48
9 oct. 2018 à 11:48
Bonjour,
Sinon, tu peux le faire sans macro, mais avec deux colonnes supplémentaires. Les numéros de semaine étant en colonne A et les conso en colonne B, en C2, à recopier vers le bas, mets :
=SI(A2<NO.SEMAINE.ISO(AUJOURDHUI());B2;NA())
et en D2 :
=SI(ESTNA(C2);B2;NA()), à recopier vers le bas.
Le graphique est construit sur les colonnes A, C et D.
https://mon-partage.fr/f/mxfTUQ9V/
Cordialement.
Daniel
Sinon, tu peux le faire sans macro, mais avec deux colonnes supplémentaires. Les numéros de semaine étant en colonne A et les conso en colonne B, en C2, à recopier vers le bas, mets :
=SI(A2<NO.SEMAINE.ISO(AUJOURDHUI());B2;NA())
et en D2 :
=SI(ESTNA(C2);B2;NA()), à recopier vers le bas.
Le graphique est construit sur les colonnes A, C et D.
https://mon-partage.fr/f/mxfTUQ9V/
Cordialement.
Daniel
via55
Messages postés
14403
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 avril 2024
2 703
12 oct. 2018 à 17:46
12 oct. 2018 à 17:46
Re
Ton fichier avec macro en retour
La macro se déclenche dès qu'on active la feuille Graph et met en transparence les semaines précédentes
Elle est basée sur le n° de semaine en C1 du tableau (modifie C1 pour voir)
https://mon-partage.fr/f/1OPPMTQ2/
Cdlmnt
Via
Ton fichier avec macro en retour
La macro se déclenche dès qu'on active la feuille Graph et met en transparence les semaines précédentes
Elle est basée sur le n° de semaine en C1 du tableau (modifie C1 pour voir)
https://mon-partage.fr/f/1OPPMTQ2/
Cdlmnt
Via
HEMIYELY
Messages postés
61
Date d'inscription
mercredi 10 mai 2017
Statut
Membre
Dernière intervention
25 janvier 2022
19 oct. 2018 à 12:37
19 oct. 2018 à 12:37
Bonjour,
Merci beaucoup pour cette solution qui fonctionne presque à merveille.
J'ai adapté la formule VBA à mon fichier. Cela fonctionne. Cependant même si la macro fonctionne, j'ai toujours un message d'erreur "Erreur d'exécution 1004, Paramètre non valide". Je clique sur debug et le graphique apparaît comme je le souhaite.
As tu une solution pour supprimer ce message d'alerte ?
Merci d'avance
Merci beaucoup pour cette solution qui fonctionne presque à merveille.
J'ai adapté la formule VBA à mon fichier. Cela fonctionne. Cependant même si la macro fonctionne, j'ai toujours un message d'erreur "Erreur d'exécution 1004, Paramètre non valide". Je clique sur debug et le graphique apparaît comme je le souhaite.
As tu une solution pour supprimer ce message d'alerte ?
Merci d'avance
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
via55
Messages postés
14403
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 avril 2024
2 703
19 oct. 2018 à 13:09
19 oct. 2018 à 13:09
Bonjour
Sans ton fichier je ne peux rien dire
Postes le sur mon-partage.fr et communiques moi le lien
Sans ton fichier je ne peux rien dire
Postes le sur mon-partage.fr et communiques moi le lien
HEMIYELY
Messages postés
61
Date d'inscription
mercredi 10 mai 2017
Statut
Membre
Dernière intervention
25 janvier 2022
19 oct. 2018 à 16:42
19 oct. 2018 à 16:42
Voici le lien
https://mon-partage.fr/f/ujDMsrkP/
https://mon-partage.fr/f/ujDMsrkP/
via55
Messages postés
14403
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 avril 2024
2 703
19 oct. 2018 à 16:47
19 oct. 2018 à 16:47
Il n'y a pas de macro dans le fichier que tu m'as envoyé ! donc pas de bug
HEMIYELY
Messages postés
61
Date d'inscription
mercredi 10 mai 2017
Statut
Membre
Dernière intervention
25 janvier 2022
19 oct. 2018 à 17:40
19 oct. 2018 à 17:40
Oups... je n'ai pas enregistré le fichier avec la macro
https://mon-partage.fr/f/4CqI39Zd/
Le voici à nouveau
https://mon-partage.fr/f/4CqI39Zd/
Le voici à nouveau
via55
Messages postés
14403
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 avril 2024
2 703
19 oct. 2018 à 17:57
19 oct. 2018 à 17:57
Bon ce n'est pas grave
Dans le 1er graphique il y avait 8 items pour chaque semaine du graphique, celui là n'en a plus que 6
Il suffit donc de corriger la ligne dans la Marco transparence du Module 1 et remplacer :
For n = 1 To 7
par For n = 1 To 6
Cdlmnt
Via
Dans le 1er graphique il y avait 8 items pour chaque semaine du graphique, celui là n'en a plus que 6
Il suffit donc de corriger la ligne dans la Marco transparence du Module 1 et remplacer :
For n = 1 To 7
par For n = 1 To 6
Cdlmnt
Via
12 oct. 2018 à 13:39
Merci pour cette réponse.
Quels sont les éléments à changer dans cette formule pour qu'elle doit adaptée à mon fichier ?
A quoi correspond "i" et "a" ?
12 oct. 2018 à 14:53
i est l'indice de la boucle qui passe en revue tous les points de la série du graphique, il n'y a pas lieu de le changer
De même a est un indice correspondant à la valeur en abscisse et a(2) renvoie la valeur de l’abscisse du point 2, donc rien à changer non plus
En principe la seule chose à modifier si nécessaire c'est le nom du graphique s'il est différent dans ton fichier (ici "Graphique 1")
Si tu avais posté un exemple de ton fichier sur mon-partage .fr, fait créé un lien, l'avoir copié puis collé ici d'ès le départ cela aurait été plus simple pour te proposer tout de suite la macro adaptée
Cdlmnt
Via
Modifié le 12 oct. 2018 à 15:18
Voici une image représentant un extrait de mon fichier.
Je veux représenter ce tableau par un histogramme.
Je souhaite que les données antérieures à la semaine actuelle soient en pointillées (ou transparents, peu m'importe, faut juste qu'elles soient représentées différemment que les données postérieures à la semaine actuelle.
Merci de votre aide.
12 oct. 2018 à 15:55
12 oct. 2018 à 16:42
Voici le lien avec l'extrait de mon fichier