Discussion :

[Bisbis27]

Bonjour

J'ai un graphique pour le quel je voudrai modifier l'echelle des abssices et des ordonnées en fonction des valeurs que j'entre dans des cellules

Le problème c'est que ça fonctionne très bien lorsque c'est un nuage de point, mais des que je modifie le type de graphique en courbe ça ne fonctionne plus

Avez vous des idéees ?


Voici mon code

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
 
If Not Application.Intersect(Target, Range("b12:b15,c6:H6")) Is Nothing Then
    ActiveSheet.ChartObjects(1).Activate
    With ActiveChart
        .Axes(xlValue).MinimumScale = Range("B12").Value
        .Axes(xlValue).MaximumScale = Range("B13").Value
        .Axes(xlCategory).MinimumScale = Range("B14").Value
        .Axes(xlCategory).MaximumScale = Range("B15").Value
    End With
End If
End Sub

Merci pour votre aide

[Menhir]

C'est normal : un graphique de type Courbe, c'est comme un histogramme : les données sont équidistantes. Il n'y a pas de max ni de min.
Tu peux le vérifier en regardant "à la main" les propriétés de l'axe de ce type de graphique.

Cela dit, le type "Nuage de point" permet également de faire des courbes.

[ARTURO83]

Bonjour,

A moins de ne pas avoir bien compris la question, ça marche plutôt bien
Pièce jointe 447993

Avec le fichier pour vérifier
Pièce jointe 447997

Cdlt