Bonjour,
J'ai crée sous VBA un UserForm qui contient un bouton de commande et un objet Window media Player.
Ce petit programme me permet de lire une video dont le fichier se trouve sur mon bureau :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Private Sub CommandButton1_Click()
WindowsMediaPlayer1.Url = "C:\Users\Patricel\Desktop\video.mp4"
WindowsMediaPlayer1.Controls.Play
End Sub
Ce que j'aimerais, c'est de pouvoir lire cette vidéo dont le fichier est contenu dans une cellule d'une feuiller excel (j'ai inséré la vidéo dans la cellule avec la commande excel : insérer objet)

J'ai modifié le programme précédent comme suit (on suppose que le fichier vidéo est sur la cellule(1,1) ) :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Private Sub CommandButton1_Click()
WindowsMediaPlayer1.Url = Cells(1,1). Value     
WindowsMediaPlayer1.Controls.Play
End Sub
Mais cela ne fonctionne pas !
Comment faire ?
Merci