K
Kahyasse
Guest
Bonjour à tous,
Je vous présente mon problème.
J'ai une feuille excel divisée en quatre partie horizontales. Dans chacune de ces parties, il y a deux images (importées d'un fichier) qui s'ajoutent à la suite de l'application d'un macro (bouton).
Le problème jusqu'à maintenant, c'est que lorsque je relance le macro, les nouvelles images s'affichent au dessus des anciennes. Il y aurait-il un moyen au début du macro, de supprimer les anciennes images déjà présente?
Je précise que toute les images de la feuilles ne doivent pas être effacées et que le nom des images changent tout le temps.
Pour le moment ma seule idée serait de sélectionner une zone de la feuille (du style bottom=1200 et top=1500) et de pouvoir supprimer ensuite les images dans cette zone. Seul hic, je ne sais pas comment faire pour sélectionner cette zone.
Pouvez-vous m'aider s'il vous plait?
Voila un exemple de l'idée:
Sub
Dim image As Object
Zone.Top = 1200 .Bottom = 1500
For Each image In Zone.Shapes
image.Delete
Next
End Sub
Merci d'avance pour votre réponse.
Kahyasse
Je vous présente mon problème.
J'ai une feuille excel divisée en quatre partie horizontales. Dans chacune de ces parties, il y a deux images (importées d'un fichier) qui s'ajoutent à la suite de l'application d'un macro (bouton).
Le problème jusqu'à maintenant, c'est que lorsque je relance le macro, les nouvelles images s'affichent au dessus des anciennes. Il y aurait-il un moyen au début du macro, de supprimer les anciennes images déjà présente?
Je précise que toute les images de la feuilles ne doivent pas être effacées et que le nom des images changent tout le temps.
Pour le moment ma seule idée serait de sélectionner une zone de la feuille (du style bottom=1200 et top=1500) et de pouvoir supprimer ensuite les images dans cette zone. Seul hic, je ne sais pas comment faire pour sélectionner cette zone.
Pouvez-vous m'aider s'il vous plait?
Voila un exemple de l'idée:
Sub
Dim image As Object
Zone.Top = 1200 .Bottom = 1500
For Each image In Zone.Shapes
image.Delete
Next
End Sub
Merci d'avance pour votre réponse.
Kahyasse