Bonjour,
je souhaite vérifier l'existence image dans un répertoire.
Les données sont définis dans un userform qui contient
le chemin du repertoire : 2 combobox (CB1 et CB2),
le nom de l'image : 1 combobox (CB3)
Je bloque totalement, je commencé un bout de code:
Merci pour votre aide
je souhaite vérifier l'existence image dans un répertoire.
Les données sont définis dans un userform qui contient
le chemin du repertoire : 2 combobox (CB1 et CB2),
le nom de l'image : 1 combobox (CB3)
Je bloque totalement, je commencé un bout de code:
Code:
sub verifimage()
C = CB1.value
D = CB2.value
img = CB3.value
If FileExists('D:\DATA\" & C &"\" & D & "\" & img & ".jpg") then
msgbox "l'image existe"
else
msgbox "l'image n'existe pas"
end if
end sub
Merci pour votre aide