Bonjour,
J'ai le même problème que dans cette discussion, je sais que je déterre un truc mais sait-on jamais. Dites moi si je dois créer mon post.

Contexte : je copie un classeur, je le colle en dessous, je trifouille des trucs et je passe à la feuille suivante.
L'erreur apparait périodiquement environ toutes les 5 feuilles, mais pour le reste des feuilles, aucun soucis.
J'ai vu passé un truc sur le msdn, pour le cas de copies de feuilles dans un classeur, il y a un dépassement mémoire au bout d'un moment, ils préconise de fermer périodiquement le classeur pour éviter ça.
Mais dans mon cas c'est un graphique avec 2 series uniquement, et surtout, déjà que c'est long, j'ai pas vraiment envie de rendre mon usine à gaz encore plus lente ><

Une idée sur comment supprimer/contourner ce problème ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
        Dim gra As ChartObject
        For Each gra In ws.ChartObjects
            If Left(gra.Chart.ChartTitle.Caption, 3) = "Cin" Then
                gra.Copy
                Exit For
            End If
        Next
        ws.Paste (ws.Cells(Placement_resultat, 8))
        Set gra = Nothing