Bonsoir,
j'ai dans une feuille excel 50 images nommés image1 à image 50.
Je veux les remplir avec une image à l'aide d'une macro du style
For i = 1 To 50
Feuil1.Image.Picture = LoadPicture("C:\toto.jpg")
next i
Mais je ne sais quoi mettre à la place de image pour faire défiler les 50
image1 à image50.
J'aurai bien vu un truc du style Feuil1.Image(i).Picture =
LoadPicture("C:\toto.jpg") ou Feuil1.Image&i.Picture =
LoadPicture("C:\toto.jpg") mais cela ne marche pas.
En visual basic, je sais que j'aurais pu creer mes images avec un index et
les nommer image(i) avec i allant de 1 à 50. Mais avec Excel je ne sais pas
faire. Si quelqu'un a une idée....
Merci
Olivier
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Laurent Longre
Hello,
For I = 1 To 50 Feuil1.OLEObjects("Image" & I).Object.Picture = LoadPicture("C:toto.jpg") Next I
Laurent
Bonsoir, j'ai dans une feuille excel 50 images nommés image1 à image 50. Je veux les remplir avec une image à l'aide d'une macro du style For i = 1 To 50 Feuil1.Image.Picture = LoadPicture("C:toto.jpg") next i Mais je ne sais quoi mettre à la place de image pour faire défiler les 50 image1 à image50. J'aurai bien vu un truc du style Feuil1.Image(i).Picture > LoadPicture("C:toto.jpg") ou Feuil1.Image&i.Picture > LoadPicture("C:toto.jpg") mais cela ne marche pas. En visual basic, je sais que j'aurais pu creer mes images avec un index et les nommer image(i) avec i allant de 1 à 50. Mais avec Excel je ne sais pas faire. Si quelqu'un a une idée.... Merci Olivier
Hello,
For I = 1 To 50
Feuil1.OLEObjects("Image" & I).Object.Picture = LoadPicture("C:toto.jpg")
Next I
Laurent
Bonsoir,
j'ai dans une feuille excel 50 images nommés image1 à image 50.
Je veux les remplir avec une image à l'aide d'une macro du style
For i = 1 To 50
Feuil1.Image.Picture = LoadPicture("C:toto.jpg")
next i
Mais je ne sais quoi mettre à la place de image pour faire défiler les 50
image1 à image50.
J'aurai bien vu un truc du style Feuil1.Image(i).Picture > LoadPicture("C:toto.jpg") ou Feuil1.Image&i.Picture > LoadPicture("C:toto.jpg") mais cela ne marche pas.
En visual basic, je sais que j'aurais pu creer mes images avec un index et
les nommer image(i) avec i allant de 1 à 50. Mais avec Excel je ne sais pas
faire. Si quelqu'un a une idée....
Merci
Olivier
For I = 1 To 50 Feuil1.OLEObjects("Image" & I).Object.Picture = LoadPicture("C:toto.jpg") Next I
Laurent
Bonsoir, j'ai dans une feuille excel 50 images nommés image1 à image 50. Je veux les remplir avec une image à l'aide d'une macro du style For i = 1 To 50 Feuil1.Image.Picture = LoadPicture("C:toto.jpg") next i Mais je ne sais quoi mettre à la place de image pour faire défiler les 50 image1 à image50. J'aurai bien vu un truc du style Feuil1.Image(i).Picture > LoadPicture("C:toto.jpg") ou Feuil1.Image&i.Picture > LoadPicture("C:toto.jpg") mais cela ne marche pas. En visual basic, je sais que j'aurais pu creer mes images avec un index et les nommer image(i) avec i allant de 1 à 50. Mais avec Excel je ne sais pas faire. Si quelqu'un a une idée.... Merci Olivier