Lire une vidéo sur 2 WMP en même temps

Bonjour à tous,

Voilà j'ai créer un Userform avec un contrôle WMP nommé WindowsMediaPlayer1.

A l'ouverture la vidéo se lance avec le code suivant:

private sub userform_initialize()

WindowsMediaPlayer1.url = "... Chemin d'accès"

End sub

Je souhaiterais maintenant ajouter un 2ème contrôle WMP sur le même Userform et qu'à l'ouverture il lise la même vidéo que le premier.

J'ai donc tenté:

private sub userform_initialize()

WindowsMediaPlayer1.url = "... Chemin d'accès"
WindowsMediaPlayer2.url = "... Chemin d'accès"
End sub

Il me lance bien la même vidéo sur les 2 contrôles mais avec un décalage...

Auriez-vous une idée pour que la vidéo se lance en même temps sur les 2 contrôles ?

Merci

MVBAM

Bonjour,

Le temps de charger la vidéo doit probablement générer ce décalage donc, peut être charger les vidéos dans Initialize et ensuite commencer la lecture avec Activate :

Private Sub UserForm_Initialize()

    WindowsMediaPlayer1.settings.autoStart = False
    WindowsMediaPlayer2.settings.autoStart = False

    DoEvents

    WindowsMediaPlayer1.URL = "... Chemin d'accès"
    WindowsMediaPlayer2.settings.autoStart = False

    DoEvents

End Sub

Private Sub UserForm_Activate()

    WindowsMediaPlayer1.Controls.Play
    WindowsMediaPlayer2.Controls.Play

End Sub

Bonjour Theze et merci pour la réponse.

J'ai également tenté de les charger d'abord puis de les lancer en même temps mais le décalage est toujours la.

Je suis obligée d'écrire une ligne de code après l'autre et j'imagine que la macro commence par lancer le wmp1, puis le 2. Et même si la procédure s'exécute très rapidement on voit et on entend un décalage.

Je ne vois vraiment pas comment contourner ce problème...

Et en faisant une manip du genre ? :

Private Sub UserForm_Activate()

    WindowsMediaPlayer1.Controls.Play
    WindowsMediaPlayer1.Controls.pause
    WindowsMediaPlayer2.Controls.Play
    WindowsMediaPlayer1.Controls.Play

End Sub

Merci pour l'astuce.

Les 2 vidéos semblent être synchro !

Excellente soirée !

MVBAM

Bonsoir,

Je reviens sur le sujet d'hier soir.

Après plusieurs essais je me rend compte que la solution de Theze ne fonctionne pas à coup sûr...

Le décalage est toujours là !

Si quelqu'un a une idée pour m'éclairer ce serait très volontiers...

Merci beaucoup

MVBAM