Bonjour à tous,

Voilà mon problème... J'ai un fichier Excel, avec une première feuille qui doit contenir une image différente selon que le contenu de l'une des cellules soit égale à 0 ou à 1. J'arrive à faire celà, lorsque les images sont stockées sur mon disque dur, mais je souhaiterais que les images soient stockées sur la feuille 2 car ce fichier sera utilisé par un grand nombre de personne sur un grand nombre de poste.

Merci d'avance...

Voilà le code que j'utilise jusqu'à présent :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub AjoutImageFeuille()
    Dim Shp As Shape
    Dim logo1 As String
    Dim logo2 As String
    Dim Cell As Range
 
    logo1 = "C:\image1.jpg"
    logo2 = "C:\image2.jpg"
 
    Set Cell = Range("test2")
    If Range("fédé") = "1" Then
    Set Shp = Feuil1.Shapes.AddPicture(logo1, msoFalse, msoCTrue, Cell.Left, Cell.Top, Cell.Width, Cell.Height)
    Else
    Set Shp = Feuil1.Shapes.AddPicture(logo2, msoFalse, msoCTrue, Cell.Left, Cell.Top, Cell.Width, Cell.Height)
    End If
End Sub