aide macro copier coller

bonjour à tous,

voila j'ai un problème avec une macro copier coller.

je m'explique
je copie une image (powerpoint) dans Excel, puis je la copie par macro sur plusieurs onglets, j'imprime par macro ces onglets puis j'ai une macro raz qui me supprime l'image du début. jusque la tout va bien.

par contre quand je colle une autre image(toujours un powerpoint) cela ne fonctionne plus. J'ai remarquer que l'image ne portait pas la même référence que la première.Je pense que cela vient de la mais comment faire pour que toutes les image aie la même référence.

Merci de votre aide qui me sera très précieuse

A+

re,

je pense avoir trouvé

A la place de shapes ("1") j'ai mis shapes("").

merci de me confirmer si c'est ok
Bon apetit
A+

Bonjour,

Si sur les feuilles il n'y a qu'un seul Shape (ici ton image), tu peux utiliser l'index 1. Attention, "1" est considéré comme étant le nom du shape et non son index donc erreur :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sub SupprimerShapes()   Dim Fe As Worksheet   For Each Fe In Worksheets   On Error Resume Next 'si pas de shape Fe.Shapes(1).Delete   Next Fe   End Sub

---

Hervé.

Bonjour these;

merci pour ta réponse,je vais essayer.
sinon le shapes(") fonctionne aussi

bonne fin de journée
A+

shapes("") il manquait un ptit quelque chose
A+