Mouvement dynamique d'objet en fonction d'un point (date) de Chart

Bonsoir à tous,

Merci tout d'abord pour votre temps de lecture. Je suis confronté à une situation où j'ai une macro qui produit une courbe avec des données que j'alimente toutes les semaines, j'ai ajouté à la main une barre horizontale que je place à la "dernière prod" à chaque fois que j'en fais une nouvelle, juste pour avoir un visuel de l'évolution.

Je voudrais pouvoir ajuster automatiquement via un bouton la position de cette ligne en mettant une date précise dans une case Xi, qui ajusteras la ligne directement sur le graphe à la date renseignée dans la case Xi mais je n'y arrive pas pour l'instant, je voudrais faire quelque chose du style :

Sub bougerLigne()

ActiveSheet.Shapes("Maligne").Left = Position X de la courbe du graphe à la date Xi

ActiveSheet.Shapes("Maligne").Top= Position Y de la courbe du graphe à la date Xi

(Une des deux lignes ne serait pas nécessaire car elle va être fixé sur la hauteur de l'objet contenant le graph, qui lui ne bouge jamais)

Merci d'avance pour vos éventuelles réponses, et bonne soirée à tous!!

Bonjour HC96 et

Une petite présentation ICI serait la bienvenue

Si vous ne l'avez pas encore fait, je vous invite à lire la charte du forum [A LIRE AVANT DE POSTER]
qui vous aidera dans vos demandes et réponses sur ce forum et notamment

• Joignez (si possible) un fichier pour augmenter vos chances d'obtenir de l'aide en cliquant sur le bouton Fichier de l'éditeur. Si votre fichier est trop lourd ou contient des données personnelles, créez une version allégée de votre fichier avec juste assez d'informations pour permettre de comprendre votre problème. Dans tous les cas, ne postez JAMAIS de fichiers avec des informations personnelles ou confidentielles (cet utilitaire peut vous aider à les retirer).

Merci de votre participation

Cordialement