Discussion :

[osito57]

il a enfin voulu me tracer les graph, grace aux macros enregistrées

Il faut que je change le nombre de resultats pour vérifier si tout peut bien se faire automatiquement, j'essaye ca tout de suite, je croise les doigts

a tout de suite

[ouskel'n'or]

Je ne sais pas où est passé ton code mais voilà

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
NomDuGraphe = "Chart 10"
For i = 1 To ActiveSheet.Shapes.Count
     MsgBox ActiveSheet.Shapes(i).Name
     If ActiveSheet.Shapes(i).Name = NomDuGraphe  Then
          With ActiveWorkbook.Names("Plage")
                ActiveChart.SetSourceData Source:=.RefersToRange
          End With
     End If
Next

Affecte à ton graphe "Chart 10" la plage "Plage"

Tu dis

A+

[osito57]

Merci pour la réponse Ousk, je vais essayer de l'appliquer.
N'empêche, c'est super sympa ce que vous faites : les réponses sont rapides et très claires.
Vraiment chapeau, pcq c'est rare des forums comme ca.

[ThierryAIM]

Parce que vous trouvez que Graphique et un titre plus clair et plus explicite que Graph
Vous le faites exprès :

PS:

je ne sais pas où est passé ton code mais voilà

devine