Graphique secteur conditionnel
Bonjour,
Je suis nouveau sur le forum et j'ai besoin d'un sacré coup de main.
Je souhaite créer un graphique où les secteurs changent de couleur en fonction d'une condition.
Dans le fichier ci-joint, la 1ère colonne représente les horaires de départ et la 2nde la durée du trajet.
Je souhaite que le graphique indique en vert les plages horaires où la durée du trajet est inférieure à 36h (un peu comme dans le graphique présenté à côté des 2 colonnes)
Merci de votre aide.
SCSK
Bonjour,
une proposition. Les graphiques standard excel ne sont pas adaptés à ce que tu veux faire. Il a fallu faire du sur mesure. la trame est fixe et les couleurs sont adaptées par la macro.
le graphique s'adapte automatiquement dès lors que tu changes une valeur en colonne B.
Bonjour h2so4,
Mon problème est résolu à 90%, grand merci.
Il me reste maintenant à pourvoir redimensionner le graphique à ma guise et pouvoir faire varier la limite de temps pour le changement de couleur. Dans cet exemple la limite de temps de trajet était de 36H, comment la faire passer à 30H ou 24H, etc...
Encore merci pour ce pas de géant.
SCSK
Chers Tous,
Ou alors, pour faire plus simple...
Peut-on demander à Excel d'affecter la même couleur obtenue par mise en forme conditionnelle aux différents secteurs correspondants dans le graphique ? (voir fichier "exemple 2" ci-joint)
Merci.
SCSK
Bonjour,
une autre proposition, s'adapte automatiquement au nombre de tranches horaires de la journée (les écarts entre les tranches doivent être constants) et à la valeur pivot
h2so4,
De mieux en mieux, merci.
Il reste la modification des dimensions à ma guise.
Aussi voudrais-je savoir si l'attribution des couleurs aux secteurs comme présenté dans le fichier "exemple 2" est faisable.
C'est cette option qui serait l'idéale pour l'usage que je dois en faire.
Merci
SCSK
Bonjour,
tout ce que tu demandes est bien sûr possible moyennant adaptation de la macro (mais cela ne m'intéresse pas de la faire). Je te conseillerais donc de changer de type de graphique et de prendre un graphique standard voire de te satisfaire d'une mise en forme telle que tu l'as déjà faite.
Merci h2so4
Cordialement,
SCSK
Chers Tous,
J'ai pu finalement résoudre mon problème avec la formule VBA suivante :
Public Sub MAJ()
Dim a As ChartObject
MAJGraph "Graphique 1", 4
End Sub
Private Sub MAJGraph(psNomGraph As String, piLigDeb As Integer)
Dim iLig As Integer
Dim bFin As Boolean
Dim iPoint As Integer
Application.ScreenUpdating = False
ActiveSheet.ChartObjects(psNomGraph).Activate
iPoint = 1
iLig = piLigDeb
bFin = False
'parcours du tableau (colonne C), à partir de la ligne indiquée en paramètre
While Not bFin
If Range("C" & iLig).Value = "" Then
bFin = True
Else
'affecte la couleur
With ActiveChart.SeriesCollection(1).Points(iPoint).Format.Fill
.Visible = msoTrue
.ForeColor.RGB = Range("C" & iLig).DisplayFormat.Interior.Color
End With
iPoint = iPoint + 1
iLig = iLig + 1
End If
Wend
Application.ScreenUpdating = True
End Sub
Voici le résultat que je recherchais:
On peut ainsi manipuler à souhait le graphique pour l'adapter à tous les scenarii.
Merci à h2so4 qui a apporté sa contribution.
Cordialement,
SCSK
Bonjour,
jolie solution !
Merci h2SO4,
Pour complètement finir, il me faut lire les plages idéales et obtenir le tableau juste en dessous du graphique.
Une idée ?
Merci .
SCSK
très interessant !
Merci h2so4.