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