Insertion et suppression image excel VBA
Résolu
aurelie76
Messages postés
88
Statut
Membre
-
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
je cherche à insérer une icone (.gif) dans une feuille excel (pour en faire un lien ensuite) et pouvoir la supprimer quand je ferme ma feuille, je ne parviens pas à trouver un code me permettant d'avancer, je précise que je suis sous excel97, merci à tous ceux qui voudront bien m'aider,
Aurelie
je cherche à insérer une icone (.gif) dans une feuille excel (pour en faire un lien ensuite) et pouvoir la supprimer quand je ferme ma feuille, je ne parviens pas à trouver un code me permettant d'avancer, je précise que je suis sous excel97, merci à tous ceux qui voudront bien m'aider,
Aurelie
Configuration: Windows XP Internet Explorer 7.0
4 réponses
-
Bonjour,
et pourquoi ne la renommes-tu pas dès l'ajout ?
ActiveSheet.Shapes(ActiveSheet.Shapes.Count).Name = "toto"
ou bien mémorise son index :
ind = ActiveSheet.Shapes.Count
ou son nom :
nom = ActiveSheet.Shapes(ActiveSheet.Shapes.Count).Name
enfin si ça marche sur 97...
Ceci dit ta 1ère question était très mal formulée
eric -
bonjour
essaye avec l'enregistreur de macro et tu devrais obtenir un code de ce style :ActiveSheet.Pictures.Insert("D:\Mes Documents\Mes images\Logo.gif").Select
à plus -
bonjour Pierre et merci, ca n'est pas aussi simple malheureusement car à chaque ouverture du fichier, on ne connait pas la valeur de la "picture" ex: ActiveSheet.Shapes("Picture 53").Select et c'est bien là le soucis, merci encore pour ton aide et si d'autres ont une soluce car je rame la dessus depuis 4 jours
aurelie. -
de rien...
tu peux mettre en résolu alors.
eric
