Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

WindowsMediaPlayer

lynyrd

XLDnaute Impliqué
Bonjour
Quelqu'un aurait elle une idée avec le code du contrôle WindowsMediaPlayer.
 

Pièces jointes

  • CINETHEQUE.xlsm
    79.6 KB · Affichages: 22

Si...

XLDnaute Barbatruc
Bon_soir

A adapter

- Pour l'ouverture

VB:
  WindowsMediaPlayer1.URL = "…\ … .mp3"   'chemin  et  nom du fichier audio
  WindowsMediaPlayer1.Controls.Play   'pour ouvrir ce fichier

- pour la fermeture
VB:
   WindowsMediaPlayer1.Controls.Stop
 

Lone-wolf

XLDnaute Barbatruc
Bonsoir lynyrd , Si..., le Forum

Je viens de faire un test et ça marche. Coche la référence windows media player.

Private Sub CommandButton1_Click()
Me.WindowsMediaPlayer1.URL = "D:\Dossiers Excel\Formulaires\Animation\Toto.avi"
End Sub
 

Si...

XLDnaute Barbatruc
Bon_soir Lone-wolf et eriiiic

lynyrd, n'ayant pas eu envie de tripoter ta programmation, je joins un exemple (les fichiers devront être dans le même répertoire d'où le Zip).
 

Pièces jointes

  • Exemple.zip
    32.1 KB · Affichages: 26

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…