Tracer un trait sur un graphique en fonction de la date

[laura_duj]

Bonjour,

Je dispose d'un graphique avec en abscisse des dates de fin de tâche avec un écart de 10 jours entre elles et en ordonnées des tâches.
J'aimerais insérer dans dans le graphique un trait rouge qui se déplace en fonction de la date du jour.
Ce trait se mettra à jour à l'aide d'un bouton "mise à jour" que j'ai créé et qui effectue déjà des calculs.

J'ai ce code, le trait se trace mais pas en fonction de la date ...

Sheets("Tableau").Shapes.AddConnector(msoConnectorStraight, 1270.7142519685, 75, _
1273.9285826772, 755.3571653543).Select
With Selection.ShapeRange.Line
.ForeColor.RGB = RGB(255, 0, 0)
End With


Quelqu'un pourrait-il m'aider svp ?

 

[Efgé]

Bonjour laura_duj et bienvenu sur le forum 🙂
Je ne sais pas si je pourrai t'aider mais, il serais plus simple, pour réfléchir à ton problème, de disposer d'un exemple.
Joint un fichier anonyme qui présente la situation.
Cordialement

 

[laura_duj]

Bonjour et merci pour votre réponse.

Voici le fichier.

Merci pour votre aide !

 

[Efgé]

Bonjour laura_duj, le fil, le forum

Désolé de ma tardive réponse...
Je pense qu'il n'y a pas besoin de macro.
Tu ajoute une série dans ton graphique.
Tu passe cette nouvelle série en "Nuage de point"
Tu modifie les valeurs de ta nouvelle série:

Cela va créer un axe secondaire (Y) que tu bloque (Min = 0; Max = 1)
Tu ajoute une barre d'erreur Y a cette série:

Un peu de mise en forme (couleur, étiquette de données...) et le tour est joué.

P.S : Je pense que des formules te donneraient le résultat des "Pourcentages de tâches" sans utiliser de macros.

Cordialement

 

[laura_duj]

Bonjour et merci pour votre aide.

J'ai créée la série, j'essaie de la faire passer en nuage de points, cependant Excel me force à mettre les 2 séries précédentes en axe secondaire si je veux les mettre en barres empilées.
Et je ne peux donc pas mettre mon nuage de point en axe secondaire ce qui modifie complétement mon graphique ...

 

[Efgé]

Re
Commence avec le graphique tel que tu l'as mis en exemple.
Sélectionne la cellule $C$3.
Tu copies cette cellule, tu sélectionne ton graphique et tu faits Ctrl+V.
Une nouvelle série est créée (et pas un nouveau point ajouté à ta première série).
C'est cette série que tu passes en nuage.

Cordialement

 

[laura_duj]

Merci ça fonctionne !
Cependant ma barre d'erreur ne va pas jusqu'en haut du graphique alors que normalement tout est correct ..
J'ai changé la valeur fixe à 1,9 mais ce n'est pas encore ça ...

 

[Efgé]

Re
C'est sur les paramètres de la barre d'erreur qu'il faut jouer
Si tu fait comme mon exemple (Max de l'axe secondaire Y bloqué à 1), tu mets "Précision = 1 "

Cordialement

 

[laura_duj]

C'est ce que j'ai fais au départ mais cela n'a pas fonctionné.

 

[Efgé]

Ton axe secondaire est bien bloqué au Max 1 ET Min 0 ?
Peux tu mettre le fichier qui pose problème

Cordialement

 

[laura_duj]

Oui j'ai bien fais comme vous ..
Je ne peux pas mettre le fichier car il est confidentiel ... mais il est semblable à celui que je vous ai joint plus haut.
Merci pour votre aide quand même..

 

[Efgé]

Re
Si tu as bien mis les mêmes valeurs de série que l'exemple que j'ai fait et si ça ne marche toujours pas, alors, essaie de jouer sur le chiffre de précision de la barre d'erreur (met 100 et tu verras...)

Cordialement

 

[laura_duj]

C'est bon ça fonctionne !
Merci beaucoup pour votre aide et votre rapidité.