Défilement d'images

Bonjour ,

Je recherche un début de code afin de faire défiler des images dans un contrôle image placer dans un userform

(J'ai des pistes en vb mais pas en vba)

Merci de votre expertise

Hello Subfestivus, Forum,

Voici un exemple avec les images qui défilent en cliquant dans la ListBox.

Tu peux très bien l'adapter avec un ComboBox ou autre SpinButton, ect...

Bon dimanche.

Merci pour cette première approche ,

Voila le code utilisé en vb pour le résultat que je recherche , est-ce possible en vba ?

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

Static IM

IM = IM + 1

PictureBox29.Image = ImageList1.Images(IM)

If IM = 5 Then

IM = 0

End If

End Sub

MERCI

Bonsoir,

Voici un exemple construit sur l'UF d'Hulk. Je ne crois pas que les anciennes versions d'Excel supporte ce contrôle. Pour ma part c'est 2010 et l'ocx "Microsoft Windows Common Controls 6.0 (SP6) :

Testé sous Excel 2007 et Win7 (64) : Ok

Ci- joint un fichier

dans lequel un userform comprenant un contrôle image et une imagelist (trois photos elles sont dans les propriétés , personnalisé) , je souhaiterai à l'ouverture de l'userform faire défiler automatiquement les photos dans le contrôle image avec l'aide d'un timer .

MERCI

houps , voilà le fichier

Bonsoir Subfestivus,

Voici un exemple :

Il faut mettre la boucle dans l'événement Activate de l'UF.

merci beaucoup,

juste besoin d'une modification sur la boucle pour quelle ne s'arrête pas

merci encore

Tu avais dit "Au démarrage".

Excel n'étant pas faire pour produire des gifs animés, je ne connais pas les incidences sur un tel formulaire lors d'appels à des sous-routines de plusieurs secondes...