Discussion :

[alain78]

Bonjour à toutes et à tous.

Voici mon souci.

Je crée un graphique (en VBA) dont tous les éléments sont des variables et notamment les bornes de l'axe vertical.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
'   bornes axe vertical
        ActiveChart.Axes(xlValue).Select
        ActiveChart.Axes(xlValue).MinimumScale = minimum_axev
        ActiveChart.Axes(xlValue).MaximumScale = maximum_axev

J'ai déclaré mes variables de type Double. J'ai essayé avec le type Decimal mais Excel le refuse !!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
    Public minimum_axev As Double
    Public maximum_axev As Double

Tout fonctionne bien pour les bornes inférieures et supérieures de l'axe vertical lorsque les valeurs sont des entiers, des pourcentages.

Mais lorsque la série est décimales, les bornes demandées (70 et 120) sont systématiquement divisées par 10 (7,0) et 12,0)

Avez vous une idée du pourquoi ?

Merci par avance pour votre aide.

Bonne fin de journée.

[Jean-Philippe André]

Bonjour,

une des solutions pour déterminer ce qui serait correctement attendu ici serait de passer par l'enregistreur de macros, lequel te donnera les valeurs par rapport à ce que tu pensais pouvoir fournir.

[alain78]

Merci pour cette piste que j'avais déjà suivie.

Et la macro donne EXACTEMENT le même code que mon code VBA.

Je pense que le problème vient du type decimal. Mais la fonction decimal n'existe pas dans mon Excel (version Office mise à jour automatiquement).

Mais comment déclarer ces variables ?

[Jean-Philippe André]

La notion de "Excel me les refuse", ca ne me dit rien… C'est une message d'erreur ? Ca plante ? le résultat n'est plus le bon ??

Peux-tu vérifier que l'autoscale est false

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
With ActiveChart.Axes(xlValue) 
 .MinimumScaleIsAuto = False 
 .MaximumScaleIsAuto = False
End With

[alain78]

L'Autoscale est bien à false.

Quand je dis que Excel refuse mes bornes, cela se traduit comme cela :
Lorsque mes bornes sont fixées par variables (ou en dur lors du debogage) à 70 (mini) et 100 (maxi), sur le graphique elles apparaissent à 7,0 et 10,0

[alain78]

J'ai enfin trouvé !

Les données saisie via une TextBox étaient enregistrées au format Texte. En les enregistrant avec la fonction Val() tout est réglé.

Comment ai je trouvé ? Lorsque j'ai essayé de modifier le format de la colonne contenant les données, Excel bipait. Ainsi il n'était pas possible de passer le format d'une donnée de 81,2 à 81 comme cela aurait du alors que toutes les données étaient au format nombre.



Bonne journée à tous.