MAJ graphique excel 97

Utilisateur anonyme -  
Salut,
je dois tracer un graphique qui représente la valeur des stocks en fonction des semaines.
mon probleme c'est que je souhaite pouvoir ajouter une semaine à mes données et que mon graphique se mette à jour automatiquement.
j'ai donc créé une macro qui ajoute cette semaine au tableau de données (en allant les chercher sur une autre feuille)
et qui augmente d'une ligne le tableau de données du graphique.
Le problème c'est que quand j'execute ma macro, la colonne des semaines, qui est en abscisse au départ, passe dans les données avec les valeurs du stock.
comment est-ce que je peux corriger ça?
Configuration: Windows NT 4.0
Internet Explorer 6.0

5 réponses

  1. Utilisateur anonyme
    voila, je l'ai associée à un bouton sur la feuille

    Private Sub CommandButton1_Click()
    Rows("11:11").Select
    Selection.Insert Shift:=xlDown
    Range("C10:F10").Select
    Selection.AutoFill Destination:=Range("C10:F11"), Type:=xlFillDefault
    Range("C10:F11").Select
    ActiveSheet.ChartObjects("Graphique 1").Activate
    ActiveChart.ChartArea.Select
    ActiveChart.SetSourceData Source:=Sheets("PANZANI SA PATES").Range( _
    "C1:C11,E1:E11"), PlotBy:=xlColumns
    ActiveWindow.Visible = False
    Windows("suivi fournisseurs REMY.xls").Activate
    ActiveSheet.ChartObjects("Graphique 2").Activate
    ActiveChart.ChartArea.Select
    ActiveChart.SetSourceData Source:=Sheets("PANZANI SA PATES").Range( _
    "C1:C11,F1:F11"), PlotBy:=xlColumns
    ActiveWindow.Visible = False
    Windows("suivi fournisseurs REMY.xls").Activate
    ActiveSheet.ChartObjects("Graphique 3").Activate
    ActiveChart.ChartArea.Select
    ActiveChart.SetSourceData Source:=Sheets("PANZANI SA PATES").Range("C1:D11") _
    , PlotBy:=xlColumns
    ActiveWindow.Visible = False
    Windows("suivi fournisseurs REMY.xls").Activate
    Range("G11").Select
    End Sub
    1
    1. Utilisateur anonyme
      j'ai essayé mais le probleme c'est que quand je redefinit ça, je n'arrive à le faire que de manière fixe mais je voudrais que ca ajoute une ligne à chaque execution.
      1
      1. Utilisateur anonyme
        je suis pas sur que mon dernier message ai été très clair,
        en fait avec ma macro, le graphique étend la zone où il prend ses données de une ligne (11 au lieu de 10) mais quand je la réexecute, le nombre de lignes ne passe pas à 12 et reste à 11.
        1
        1. el matador
          bonjour colle ta macro sur le forum pour ce qui ne va pas dans ta macro.
          0
          2. el matador
            je pense qu'il faut que tu ai redefinir la selection de ton graphique dans ta macro.
            0