XL 2016 Importer image dans Userform

[badraaliou4]

Salut,
je voulais importer des images dans mon userform mais je n'aimerai voir les fichiers JPG et JPEG lors de la selection
Le code que j'ai trouvé me mettre de filtre juste un format, JPG ou JPEG

Merci de votre aide

sub ImportImage()
Dim Fichier As Variant
   Fichier = Application.GetOpenFilename("Tous les fichiers (*.jpg), *.jpg")
   If Fichier = False Then Exit Sub
end Sub

 

[Oneida]

Bonjour,

Sub ImportImage()
    Dim Fichier As Variant
   Fichier = Application.GetOpenFilename("Tous les fichiers (*.jp*), *.jp*")
   If Fichier = False Then Exit Sub
End Sub

 

[badraaliou4]

Bonjour,

Sub ImportImage()
    Dim Fichier As Variant
   Fichier = Application.GetOpenFilename("Tous les fichiers (*.jp*), *.jp*")
   If Fichier = False Then Exit Sub
End Sub

Merci beaucoup
ça marche très bien