Microsoft 365 création Graphique

[Chev]

Bonjour a tous,

J'ai quelque problème lors l'exécution de mon programme VBA. Je suis entrain de créé une mini base de donné pour évaluer la duré de vie de support.
Pour ce faire j'ai créé un programme avec des userform et Combobox pour pouvoir ajouté de nouveau support avec un graphique montrant leur durée de vie restante.
Pour ce faire j'ai créé des tableaux et graphiques étalons que je viens, à laide d'une macro, copier et coller sur les ligne précédentes. Cependant, les formules rentrées dans le tableau sont forcement bloquées par des $ que ce soit en ligne ou en colonne et je ne peux pas les changer pour ne laisser que les colonnes bloquées:
=SERIE(;'durée de vie rack'!$B$21:$B$24;'durée de vie rack'!$D$21:$D$24;1)
Je n'arrive pas à modifier ce qui est rentré dans le graphique en automatique à l'aide d'une macro car pour ce faire il faut le nom du graphique venant d'être créé et je ne sais pas comment faire une macro adaptative avec ce nom changeant.

merci d'avance pour votre aide

 

[sylvanu]

Bonjour Chev,
Cette macro récupère le nom du graphique dans la feuille. ( il faut qu'il n'y ait qu'un seul graphique )
Puis change la plage à représenter.

Sub Essai()
    ' Récupérer nom du graphique
    NomGraphique = Sheets("Feuil1").ChartObjects(1).Name
    ' Change la plage de la courbe
    ActiveSheet.ChartObjects(NomGraphique).Activate
    ActiveChart.SeriesCollection(1).Select
    ActiveChart.SeriesCollection(1).Formula = "=SERIE(Feuil1!$C$2;Feuil1!$B$3:$B$5;Feuil1!$C$3:$C$6;1)"
    Range("A1").Select
End Sub

 

[Chev]

Mon problème est que j'ai un Graphique par support!!
mais merci pour ta réponse!

 

[sylvanu]

Excel n'étant pas devin, vous avez la possibilité de trouver les noms de tous les graphiques avec :

For N = 1 To Sheets("Feuil1").ChartObjects.Count
        MsgBox Sheets("Feuil1").ChartObjects(N).Name
Next N

Mais Excel ne pourra pas deviner de quel graphique vous parlez. Il vous faut trouver un discriminant pour le faire. ( comme le titre par ex si celui ci est un invariant )

 

[Chev]

Il n'est pas possible d'avoir les valeur rentré dans le graphique sans $ ou avec seulement les colonnes de bloquées?

 

[sylvanu]

Vous avez beau les supprimer, XL les remet, donc, à mon avis, non.

 

[Chev]

Vous avez beau les supprimer, XL les remet, donc, à mon avis, no

D'accord, je vais devoir filouté alors, je vous remercie de vos réponses !