Discussion :

[Fab117]

Salut,
En résumé, voici ce que doit faire ma macro :
1 ) Selectionner toutes les données d'un TDC se trouvant en "A4"
2 ) Le copier
3 ) Le coller en "BB40"
4 ) Le coller (collage spécial, seulement les valeurs) en "A4"
5 ) Selectionner les valeurs dès "A7"
6 ) Faire un graph
7 ) Selectionner le TDC en "BB40"
8 ) Le couper
9 ) Le coller en "A4"

Après maints efforts , ma macro est presque au point.
Mais dans l'ordre décrit ici, le point 7) ne fonctionne pas.

Par contre, si je ne fais pas le graphique => suppression du point 6), elle fonctionne parfaitement. Je ne comprend pas pourquoi la présence du graphique vient perturber la sélection des données.

Je joins ci-dessous mon fichier.

Fab

NB : Pour la selection des données, le code m'a été donné pour la plage dès "A7" et je l'ai adapté pour la sélection dès "BB40", mais c'est peut-être bien la qu'est le problème (en fait, je ne comprend pas très bien cette ligne, surtout le IV8) :

Code :

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

1
2
3
4
For Col = Range("IV8").End(xlToLeft).Column To 1 Step -1 
If UCase(Cells(8, Col)) = "GRAND TOTAL" Then Exit For 
Next Col 
Range(Range("BB4"), Cells(Range("BB8").End(xlDown).Row, Col)).Select

[Fab117]

Resalut,
Problème résolu.
Bon week-end.

Fab