Help : GRAPHIQUE SOUS EXCEL
OLIVIER
-
Céline -
Céline -
avoir sur un graphique excel :
age : en abscisse
rémunération :ordonnée
nom personne : affiché pour chaque point .
j'ai fait une recherche avec l'aide d'excel je n'arrive pas a obtenir ce que je veux.
Est ce possible simplement ? avec une macro ?
merci de votre aide
age : en abscisse
rémunération :ordonnée
nom personne : affiché pour chaque point .
j'ai fait une recherche avec l'aide d'excel je n'arrive pas a obtenir ce que je veux.
Est ce possible simplement ? avec une macro ?
merci de votre aide
2 réponses
Merci...
Mais j'ai vu que "VBA sur Excel pour les nuls" n'est plus en stock...
Je prefère me spécialiser tout de suite sur excel (je bosse tout le temps dessus)
Y'a pas moyen de me dire la technique à faire et à reproduire à l'infini?
d'autant plus que ci dessus j'ai le "code vba" que j'aurais à appliquer!
mais pour entrer dans la macro?!
Merci :-/
Mais j'ai vu que "VBA sur Excel pour les nuls" n'est plus en stock...
Je prefère me spécialiser tout de suite sur excel (je bosse tout le temps dessus)
Y'a pas moyen de me dire la technique à faire et à reproduire à l'infini?
d'autant plus que ci dessus j'ai le "code vba" que j'aurais à appliquer!
mais pour entrer dans la macro?!
Merci :-/
c'est possible ?
super si c'est le cas
mais une petite question alecoq est la meme personne qu'olivier ou non?
a plus
alecoq non ce n'est pas la meme personne à moins que tu ais mis un a a la place du o.
la feuille sur laquelle se trouve les données s'appelle chiffres
les deux premiéres lignes sont vides ( trois colonnes age/ salaire/nom)
Sub ajouter_le_nom_du_salarie_sur_les_points_du_graphique()
Dim etiquette As Variant
i = 3 ' car les informations commencent en ligne 3
Dim BOOL As Integer
etiquette = Worksheets("Chiffres").Cells(i, 3).Value ' initialisation de étiquette
While BOOL = 0
i = i + 1
Sheets("chiffres").Select ' si le nom des feuilles changent penser a changer
' le nom de la feuille qui est ici chiffres
With Worksheets("Chiffres").ChartObjects(1).Chart ' active le graphique
With .SeriesCollection(1).Points(i - 3) ' les indices des points ici sont à i-3 car i a été incrémenté de 1
'
.HasDataLabel = True
.DataLabel.Text = Worksheets("Chiffres").Cells(i - 1, 3).Value
End With
End With
etiquette = Worksheets("Chiffres").Cells(i, 3).Value
If etiquette = Vide Then BOOL = 1
Wend
End Sub
Quelqu'un peut me dire vite fait la manip à faire pour faire des macros?
Histoire de suivre et de comprendre après!
J'arrive pas à trouver d'explication simple des macros et j'en ai bigrement besoin dans le cadre de mon travail...
Merci pour votre aide!