• Initiateur de la discussion Initiateur de la discussion jack
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

J

jack

Guest
Bonjour le forum

J'ai modifié une application de Michel Xld à propos des chartspaces
Je souhaiterais en apporter d'autrs mais je coice
Est il possible de faire en sorte d'avoir les légendes dans le USF c'est à dire la date et les couleurs qui correspondent ( ex le vert pour le 24/10/05 => en selectionnant la date et la couleur les deux soient notées en légende)et d'avoir sur le graphique les valeurs du tableau (Ex 67 pour le lundi et 24/10/05) merci pour votre aide toujours aussi précieuse

Slts
Jack [file name=exempleUtilisationChartSpace_20060126123227.zip size=16064]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/exempleUtilisationChartSpace_20060126123227.zip[/file]
 

Pièces jointes

bonjour Jack

j'espere que cette adaptation répondra à ta demande


bon apres midi
MichelXld [file name=UtilisationChartSpace_affichageLegende.zip size=13189]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/UtilisationChartSpace_affichageLegende.zip[/file]
 

Pièces jointes

rebonjour Jack

en relisant ton message je viens de m'apercevoir que tu souhaites aussi afficher les valeurs associées aux séries

dans ce cas tu peux ajouter

With Cht
.SetData C.chDimCategories, C.chDataLiteral, Tableau
'ajout de la légenge pour chaque serie
.SeriesCollection(x).Caption = Cells(j + 2, 7)
.SeriesCollection(x).DataLabelsCollection.Add
.SeriesCollection(x).SetData C.chDimValues, C.chDataLiteral, Plage
.SeriesCollection(x).Interior.Color = 50000 * (j + 1)
End With



bon apres midi
MichelXld

Message édité par: michelxld, à: 28/01/2006 19:08
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

J
Réponses
16
Affichages
21 K
J
Retour