Vba-histogramme etiquette

[Celeda]

Bonjour,

Je suis à la recherche d'une macro qui place dans un histogramme une information supplémentaire d'un tableau.

Voici : ici dans cet histogramme, j'affiche tous les noms qui sont à 100 % mais en plus, je souhaite leur associer la qty qui reste à faire.
Par contre, pour ceux qui sont à 0 % et bien nada, on n'affiche aucune qty.

Exemple : Toto a 3 quantités à faire et il est à 100 %, Titi a 2 quantités à faire et il est aussi à 100 %.

Manuellement je n'ai pas trouvé ou bien j'ai oublié.

Merci à l'avance pour votre aide, toujours très appréciée 🙂

 

[Cousinhub]

Re : Vba-histogramme etiquette

Bonjour,

Si j'ai bien compris, on ne met les quantités qui restent à faire, qu'aux valeurs comprises entre 1 et 99%?????

Petit code à adapter :

Sub Macro1()
Dim DataLbl As DataLabel
Dim Pct As Byte, Reste As Byte, I As Byte
Dim Z
I = 1
For Each DataLbl In ActiveSheet.ChartObjects("Graphique 1").Chart.SeriesCollection(1).DataLabels
    Pct = Mid(DataLbl.Caption, 1, InStr(1, DataLbl.Caption, "%") - 1)
    If Pct > 0 And Pct < 100 Then
        Z = DataLbl.Parent.Parent.XValues
        Reste = Cells(Application.Match(Z(I), Columns(1), 0), 3)
        DataLbl.Caption = Pct & "%" & Chr(10) & "Qty : " & Reste
    Else
        DataLbl.Caption = Pct & "%"
    End If
    I = I + 1
Next DataLbl
End Sub

A voir le nom du graphique, ainsi que le numéro de la série....

Bonne journée

 

[Celeda]

Re : Vba-histogramme etiquette

Bonjour,

bhbh, merci pour ton aide lointaine (physiquement lol!!)

C'est presque cela : la colonne concernée est en fait la colonne D

je crois pouvoir modifier dans cette ligne de code :

Reste = Cells(Application.Match(Z(I), Columns(1), 0), 3)

4 au lieu de 3

Par contre, les trois premieres infos ne s'affichent pas : celles qui sont concernées par le 100 % ??😕

 

[Cousinhub]

Re : Vba-histogramme etiquette

Bonjour,

Ben, comme je n'avais pas trop compris :

j'affiche tous les noms qui sont à 100 % mais en plus, je souhaite leur associer la qty qui reste à faire.

Pour moi, s'ils sont à 100%, il n'y a plus de qty à faire.....😉

Dans le cas de 100%, que voudrais-tu afficher?

Ce qui a été fait?

@ te relire

 

[Celeda]

Re : Vba-histogramme etiquette

Bonjour,
"Dans le cas de 100%, que voudrais-tu afficher?"
en fait, ce graph affiche toutes les personnes qui n'ont encore rien fait du tout!!!😱 et ainsi de suite jusqu'à celles qui ont tout fait (0%)

Dans la colonne B, on idientife les qtys à faire soit :
exemple : 3 pour toto
dans la colonne C, on voit qu'il n'a rien modifié soit 0
par conséquent, dans la colonne D, on retrouve la qty à faire soit 3
et la colonne E, identife le pourcentage à faire.

Mais pour être complège, je voulais coupler les informations :
le pourcentage à faire et la quantity que cela représente, dans l'étiquette.
Ce que tu as parfaitement réussi.
(j'ai plusieurs graphs à sortir et cette automatisation risque de pas mal allégé mon travail manuel).

J'espère être plus claire.🙂
Merci