Supression d'une image en VBA
Bonsoir à tous,
Un petit soucis tout bête je cherche à supprimé en VBA, une image loader en VBA dans une boite à image en fonction de la valeur d'une combobox.
voici mon code:
Code:
1
2
3
4
5
6
7
8
9
|
Dim Cellule21 As Range
If Combobox1.Value = "" Then
Image3.Picture(Cellule21).Delete 'Ici je cherche à suprimé mon image...
Else
For Each Cellule21 In Range("tmaps").Columns(5).Cells
If Cellule21.Offset(, -4) = Combobox1.Value Then Image3.Picture = LoadPicture(cheminxls & "\Images films\Fichier prog\" & Cellule21.Value & ".jpg")
Next
End If |
Merci pour votre aide...
