1 digit au lieu de 2 dans Xvalues

Version imprimable

1 pièce(s) jointe(s)

Salut tout le monde,

J'ai un objet objXvalues () qui est vecteur de nombres entiers allant de -2 à 30.
Je désigne objXvalues comme Xvalues de chaque série.
Il m'affiche en effet l'axe x avec les bonnes valeurs mais seulement le premier digit (voir image).

Comment puis-je éviter cela?
Code:

1 2 3 4 5 6 7 8 9 10 11 12 Dim objXvalues (), countrows as Integer, StartArray as Integer, EndArray as Integer, iCount as Integer countrows = Sheets("TabMoyenne").Cells(Sheets("TabMoyenne").Rows.Count, 1).End(xlUp).Row ReDim objXvalues(1 To countrows - 1) StartArray = -2 EndArray = countrow + StartArray - 1 For iCount = 1 To countrows - 1 objXvalues(iCount) = StartArray StartArray = StartArray + 1 MsgBox (objXvalues(iCount)) Next
Le MsgBox m'affiche correctement les valeurs successives avec 2 digits.
Code:

1 2 3 4 5 With ActiveChart.SeriesCollection(iList + 1) .XValues = objXvalues .Border.Weight = xlMedium .MarkerSize = 6 End With
MERCI D'AVANCE ! :ccool:

08/07/2010, 12h27
mayekeul

bonjour,
et si on gere les format avec un code du genre

Code:

ActiveSheet.ChartObjects("Chart 1").TickLabels.NumberFormat = "#.##0,00"
08/07/2010, 13h13
Kiklefou

1 pièce(s) jointe(s)

Non, c'est pas ça. Mais merci quand même !

Ca fonctionne sur l'axe Y qui n'est pas spécifié, mais pas sur l'axe X.
Voir image.

Code:

ActiveChart.Axes(xlValue).TickLabels.NumberFormat = "#.##0,00"
08/07/2010, 13h31
mayekeul

c'est ça qui ne fonctionne pas?

Code:

ActiveChart.Axes(xlCategory).TickLabels.NumberFormat = "#.##0,00"

ou ça?

Code:

ActiveChart.Axes(xlValue).TickLabels.NumberFormat = "#.##0,00"

ceci dis, cela chez moi!
08/07/2010, 13h55
Kiklefou

Code:

ActiveChart.Axes(xlCategory).TickLabels.NumberFormat = "##00"

Fonctionne !

Mais, du coup les unités entre -2 et 9 sont affichés avec un zéro en face (-02, -01, ...).

C'est pas encore parfait.
09/07/2010, 09h38
Kiklefou

C'est bizarre, j'ai été me renseigner sur d'autres sites et j'ai essayé des format conditionnel mais ça ne fonctionne pas non plus.

Le systeme de lecture des conditions m'échappe car il en lit une mais pas la suivante ou la dernière mais pas la première. Enfin, c'est pas clair et ça ne fonctionne pas.

Pour un axe allant de -2 à 30:

Code:

ActiveChart.Axes(xlCategory).TickLabels.NumberFormat = "[<10]#0;[>=10]##00"

Des idées?