Etiquettes de données sur plusieurs lignes

JBOBO

XLDnaute Accro

• 30 Septembre 2010

• #2

Re : Etiquettes de données sur plusieurs lignes

Bonjour,

Un debut de solution en piece jointe.

 

Pièces jointes

• gbi(2).xls

  42 KB · Affichages: 104
• gbi(2).xls

  42 KB · Affichages: 117
• gbi(2).xls

  42 KB · Affichages: 120

Vote positif 0 Vote négatif

G

GBI

XLDnaute Occasionnel

• 1 Octobre 2010

• #3

Re : Etiquettes de données sur plusieurs lignes

Bonjour Jbobo,

Merci pour cette réponse, j'avais oublié l'itération "CAR(10)" qui correspond tout à fait à mon besoin
Aurais-tu une idée pour la couleur?
Cdt
gbi

 

Vote positif 0 Vote négatif

JBOBO

XLDnaute Accro

• 1 Octobre 2010

• #4

Re : Etiquettes de données sur plusieurs lignes

Bonjour,

J'ai essayé quelque chose qui permet de mettre en rouge ou vert la police dans les cellules de références, malheureusement la mise en forme ne se reproduit pas dans les etiquettes de données.

je t'envoie le fichier qd même au cas où tu parviens à en tirer quelque chose

A mon avis si c'est possible ça passe par la macro et là j'en appelle aux spécialistes.

 

Pièces jointes

• gbi(2).xls

  48 KB · Affichages: 85
• gbi(2).xls

  48 KB · Affichages: 89
• gbi(2).xls

  48 KB · Affichages: 101

Vote positif 0 Vote négatif

G

GBI

XLDnaute Occasionnel

• 1 Octobre 2010

• #5

Re : Etiquettes de données sur plusieurs lignes

Après une brève recherche j'ai trouvé cela:
XL: Récupérer le format de cellule par Coller avec liaison

REMARQUE :

- Il n'est pas possible de lier le format d'une cellule à une autre.

Cliquez pour agrandir...

A défaut de satisfaire le besoin MS est conscient de l'absence de solution

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 1 Octobre 2010

• #6

Re : Etiquettes de données sur plusieurs lignes

Bonjour GBI, JBOBO,

Pour colorer la police des étiquettes de données, cette macro :

Code:

Sub CouleurPoliceEtiquette()
Dim p As Object
For Each p In ActiveSheet.ChartObjects("Chart 1").Chart.SeriesCollection(2).Points
p.DataLabel.Font.ColorIndex = IIf(InStr(p.DataLabel.Characters.Text, "-"), 3, 10) 'police rouge et verte
Next
End Sub

On peut la lancer par une Worksheet_Change dans le code de la feuille (clic droit sur l'onglet et Visualiser le code).

Donc double-clic sur une cellule puis touche <Entrée>.

Fichier joint.

A+

 

Pièces jointes

• gbi(3).zip

  18.2 KB · Affichages: 66

Vote positif 0 Vote négatif

G

GBI

XLDnaute Occasionnel

• 1 Octobre 2010

• #7

Re : Etiquettes de données sur plusieurs lignes

Bonjour Job75,

Super !
Exactement ce que je cherchais, merci

 

Vote positif 0 Vote négatif

JBOBO

XLDnaute Accro

• 1 Octobre 2010

• #8

Re : Etiquettes de données sur plusieurs lignes

re,

C'est pas mon post mais merci JOB75 pour l'info.

 

Vote positif 0 Vote négatif