Executer deux actions en meme temps

Bonjour a tous,

Je souhaite executer deux actions en meme temps sur VBA.

Je m'explique quand je clique sur un CommandButton1, j'aimerais afficher une image et ecouter un son en meme temps.

Cependant lorsque je clique sur le CommandButton1 le son se lance et seulement a la fin du son l'image apparait.

Quelqu'un saurait me dire comment executer ces deux actions en meme temps ?

Voici mon code ci-dessous :

Private Sub CommandButton1_Click()

Image1.Picture = LoadPicture("C:\Users\Picture.jpg")

Application.ExecuteExcel4Macro "SOUND.PLAY(,""C:\Users\demo.wav"")"

End Sub

Par avance merci.

Salut Gregouz,

entre les deux instructions, place :

DoEvents()

Cela devrait permettre au code d'exécuter ta deuxième instruction!

A+

Salut Curulis,

Merci de ta reponse.

Cependant j'ai fait ce que tu m'as dit mais ca ne marche pas.

J'ai peut etre mal compris..

Je te mes ci-dessous ce que j'ai fait :

Private Sub CommandButton1_Click()

Image1.Picture = LoadPicture("C:\Users\Picture.jpg")

DoEvents()

Application.ExecuteExcel4Macro "SOUND.PLAY(,""C:\Users\demo.wav"")"

End Sub