bouton pour ouvrir une video

[christian_noel]

bonsoir à tous,

Je fais suite au message que j'ai posté Hier sur lequel je m'était mal éxprimé.

En faite ce que je voudrais si possible c'est ouvrir une video sous windows media player à l'aide d'un bouton. (sachant que mon fichier media player ce trouve sur le C: )

pouvez vous me montrer un exemple d'ecriture pour cela

Merci d'avance🙂

 

[Celeborn61]

Re : bouton pour ouvrir une video

Salut,

Tu peux lier ton bouton à un lien HyperText, ça me semble la solution la plus simple.

 

[kjin]

Re : bouton pour ouvrir une video

bonsoir christian_noel, Celeborn61, bonsoir à tous,
Nickel le titre du fil - merci
Je suis tenant de la solution de Celeborn61 mais bon
Un lien t'a déjà été aimablement fourni ici https://www.excel-downloads.com/threads/bouton-pour-ouvrir-une-video.90434/
En suivant ce lien, j' arrive ici :

Lancer une video:

Sub lancerUneVideo()
Dim Wmp As WindowsMediaPlayer
Set Wmp = CreateObject('WMPlayer.OCX.7')
Wmp.openPlayer 'C:\\monFilm.mpg'
End Sub

Il suffit de copier cette macro dans un module et de l'associer à un bouton, en remplaçant 'C:\\monfilm.mpg' par le chemin pour accèder à ta vidéo.
N'utilisant pas WMP je n'ai pas testé...
A+
kjin

 

[kjin]

Re : bouton pour ouvrir une video

Re
le lien en question:https://www.excel-downloads.com/threads/piloter-windows-media-player-depuis-excel.43029/