Affichage Dynamique d'images dans un UserForm
Bonjour,
J'aurais aimé avoir de l'aide pour faire défiler les photos contenues dans un dossier spécifique sur un UserForm (10 secondes entre chaque photos par exemple)
Après de nombreux essais je n'y arrive toujours pas...
Cdlmnt
J'aurais aimé avoir de l'aide pour faire défiler les photos contenues dans un dossier spécifique sur un UserForm (10 secondes entre chaque photos par exemple)
Après de nombreux essais je n'y arrive toujours pas...
Cdlmnt
Configuration: Windows / Edge 16.16299
1 réponse
-
ContributeurBonjour,
voici un exemple à télécharger:
https://www.cjoint.com/c/IGkj2qJO4SQ
-
-
-
Contributeurchanger ceci dans le module Timer
Sub Diapo() If UserForm1.ListBox1.ListIndex = UserForm1.ListBox1.ListCount - 1 Then 'après la dernière image UserForm1.ListBox1.ListIndex = 0 'on redemarre à la 1ère image End If On Error Resume Next NumNom = UserForm1.ListBox1.ListIndex NumNom = NumNom + 1 UserForm1.ListBox1.ListIndex = NumNom End Sub
@+
-