Fonction (ou macro) pour incorporer des images dans Excel

Bonjour, (débutant)

le problème me parait simple, mais pas moyen d'y arriver:

"je dispose d'une colonne contenant des chemins d'images, je souhaite tout simplement une fonction à mettre dans la colonne d'à coté pour incorporer et afficher ces images"

la macro suisvante fonctionne:

Code:

---

1 2 3 4 5 6 7 8

Sub Macro1() ' ' Macro1 Macro ' Macro enregistrée le 16/05/2007 par userX ActiveSheet.Pictures.Insert( _ "C:\Documents and Settings\user\Mes documents\Mes images\Logos\animalis.gif"). _ Select End Sub

---

mais dès que je l'appelle depuis une fonction ça plante!!! pourquoi?


Sila "fonction" était définitivement impossible, il me reste la possibilité de faire une macro qui affiche d'un coup toutes les images en balayant ma colonne contenant les chemins. Qqun peut il m'aiguiller pour faire ce genre de boucle ?

Merci

Ton code ne pose pas de problème.
Tu mets "dès que je l'appelle depuis une fonction"... Qu'entends-tu par là ?
Où as-tu une erreur ? Sur quel ligne ? Quel message ?
Montre ta fonction
A+

bonsoir,

voici le code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

Function test()   Macro1   End Function   Sub Macro1() On Error GoTo erreur:   ' Macro1 Macro ' Macro enregistrée le 16/05/2007 par userX ActiveSheet.Pictures.Insert( _ "C:\Documents and Settings\user\Mes documents\Mes images\Logos\animalis.gif"). _ Select Exit Sub   erreur: MsgBox Err   End Sub

---

si je met dans une cellule de mon tableau Excel la formule "=test()"

la Macro1 tombe en erreur 1004.

alors que quand je la lance directement elle marche ?

Merci

2 choses à savoir:
Une fonction, placée dans une cellule, ne peut pas modifier les données d'autres cellules.
Une procédure modifiant des données dans une/des feuille(s) doit être placée dans un module et pas d'ans le code d'une feuille.