VBA - Positionner correctement un graphique à côté d'une cellule spécifique

Bonjour à tous,

J'aimerais que mon graphique se positionne exactement à un endroit précis sur ma feuille. --> Commencer en "E4" tel que :

J'utilisais le code suivant mais je viens de remarquer que selon les ZOOM, les écrans utilisés, la position du graphique varie.

Sub position_graph()

    ActiveSheet.ChartObjects("Graphique 1").Activate
    ActiveSheet.Shapes("Graphique 1").IncrementLeft 1.8
    ActiveSheet.Shapes("Graphique 1").IncrementTop 0.6

End Sub

Existe-t-il une solution pour fixer ce graphique comme le screen ci-dessus ? (cellule E4), sachant que ce graphique est d'abord supprimé puis recréé à chaque lancement d'une macro.

Un grand merci par avance !! Bon dimanche

Bonjour Temprano,

Normalement avec un truc du style

 ActiveSheet.Shapes("Graphique 1").Left  = range("E4").Left
 ActiveSheet.Shapes("Graphique 1").Top = range("E4").Top

A+

Super merci pour la solution !!