Bonjour,

Pour trouver les shapes qui existent dans une feuille on peut faire:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
Dim img As Object
 
For Each img In Worksheets(1).Shapes 'ou Worksheets("nom").Shapes
  msgbox img.Name
Next
Mais si un shape dans la feuille contient plusieurs autres shapes alors comment les trouver?


Merci