Position graphique dans la feuille

Bonjour,

j'ai un code pour les graphiques que je recycle pour d'autres mais que je ne maîtrise pas. Il positionne le graphique en C9 (voir le bout de code ci-dessous). J'aimerais qu'il se positionne ailleurs. Je n'ai pas de position privilégiée. Il suffit juste qu'il apparaisse sur la portion de feuille visible à l'écran au moment où je lance la macro en gardant les dimensions déjà définies dans le code.

Merci pour votre aide.

Dim wsData As Worksheet, wsChart As Worksheet
Dim rngChart As Range
Dim objChart As ChartObject
Dim objLE As LegendEntry
ActiveSheet.unprotect Password:="toto"

    Set wsData = Feuil2
    Set wsChart = ActiveSheet

    On Error Resume Next
    wsChart.ChartObjects(1).Delete
    On Error GoTo 0

    Set objChart = wsChart.ChartObjects.Add _
            (Left:=wsChart.Columns("c").Left, _
            Top:=wsChart.Rows(9).Top, _
            Width:=800, _
            Height:=280)
Rechercher des sujets similaires à "position graphique feuille"