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

Autres (RESOLU)Déclencher un fichier AUDIO sous condition

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

chaelie2015

XLDnaute Accro
Bonjour Forum

Est-il possible de déclencher un fichier audio (en MP3) si une cellule contient une certaine valeur?
exemple : fichier audio nommé "Son01.mp3" je souhaite déclencher le fichier si la cellule A1 affiche "accord".

Merci pour votre réponse
 
Dernière édition:
Solution
Bonsoir le forum
Bonsoir chaelie, xUpsilon

Dans un module :
VB: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") = "accord" Then
    Shell ("C:\Program Files\Windows Media Player\wmplayer.exe """ & "C:\a\Musique\Zaz - La Fée.mp3" & "")
End If
End Sub

Le chemin est bien sur à adapter
Bonne nuit
@+ Eric c
Trier par date Trier par votes
Bonsoir le forum
Bonsoir chaelie, xUpsilon

Dans un module :
VB: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") = "accord" Then
    Shell ("C:\Program Files\Windows Media Player\wmplayer.exe """ & "C:\a\Musique\Zaz - La Fée.mp3" & "")
End If
End Sub

Le chemin est bien sur à adapter
Bonne nuit
@+ Eric c
 
Vote positif 0 Vote négatif
Solution
bonjour à tous
@TooFatBoy
ca c'est la version exclusivement vba comme ca on a pas besoins du VBS
VB: 
Dim player As Object
 
Sub test()
playMP3 "H:\mes musique\Amy Mc Donald\This is the Life - Amy Mac Donald\02 - This is the life2.mp3"
End Sub

Sub playMP3(chemin)
Set player = CreateObject("new:WMPlayer.OCX.7")
player.URL = chemin
End Sub
 
Sub playerStop()
player.Controls.Stop
End Sub

j'ai d'ailleurs fait mon propre player basé sur ce code
comme ca je ne suis pas obligé d'utiliser le control WMP
et l'interface c'est le mien 😉
 

Pièces jointes

Vote positif 0 Vote négatif
Bonjour ERIC, 🌹TooFatBoy🌹, patricktoulon
@ Eric: Merci pour la réponse c'est parfait, mais est ce que il y a une possibilité de lancer audio sans afficher le Windows Media Player?
Merci par avance
 
Vote positif 0 Vote négatif
chaelie2015 à dit:
Bonjour ERIC, 🌹TooFatBoy🌹, patricktoulon
@ Eric: Merci pour la réponse c'est parfait, mais est ce que il y a une possibilité de lancer audio sans afficher le Windows Media Player?
Merci par avance
Cliquez pour agrandir...
heu .. il s'agirait de ne pas lire en diagonale les reponse que l'on te donne hein!!
en aucun cas le code du post 9 ouvre l'application WMP
le fichier c'est juste pour montrer une ébauche d'interface perso et que toute les fonctions de( lecture/pause/stop/etc....) sont dispos même sans l'interface WMP
c'est sur que si tu te jette sur le téléchargement du fichier sans lire la réponse tu va pas comprendre
 
Vote positif 0 Vote négatif
Merci
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

D
  • Question Question
Microsoft 365 Filtrer sur la feuille 1 et que ce même filtre s'applique sur le feuil 2
Réponses
5
Affichages
162
desmonts
D
D
  • Résolu(e)
Microsoft 365 Validation de données sous condition
Réponses
8
Affichages
294
drop91
D
W
  • Question Question
XL 2016 La fonction SI avec conditions multiples
Réponses
4
Affichages
124
TooFatBoy
R
  • Résolu(e)
Microsoft 365 VBA Création dossier + sous dossier + enregistrer le fichier dans le dossier
2
Réponses
17
Affichages
1 K
raf26
R
S
  • Résolu(e)
XL 2021 "Blocage de la mise a jour d'une cellule"
Réponses
8
Affichages
229
Steph733
S
P
  • Question Question
XL 2019 Ouvrir un fichier toujours sur le même onglet et cellule
Réponses
9
Affichages
274
job75
T
  • Résolu(e)
XL 2019 Afficher un mot dans une colonne paramétrée en liste déroulante
Réponses
4
Affichages
191
telemarrk
T
F
  • Question Question
Microsoft 365 Macro copie colle si condition
Réponses
9
Affichages
177
Jacky67
R
  • Résolu(e)
XL pour MAC Créer un sous groupe à partir d'un groupe
2 3 4
Réponses
48
Affichages
2 K
rtlv17
R
D
  • Résolu(e)
Microsoft 365 Récupérer la valeur d'une cellule d'un autre fichier
Réponses
7
Affichages
355
Diane272727
D
A
  • Question Question
Microsoft 365 Remplir une cellule automatique, sous condition
Réponses
6
Affichages
340
Phil69970
U
  • Question Question
Autres automatiser un fichier
2
Réponses
27
Affichages
808
Bernard_XLD
  • Question Question
Microsoft 365 créer des feuilles automatiques et une formule avec condition de remplissage
Réponses
2
Affichages
283
luno123
U
  • Résolu(e)
XL 2016 Création d'un fichier excel à partir d'un bouton
Réponses
7
Affichages
289
Utilisateur_X
U
P
  • Question Question
Microsoft 365 Sommeprod avec Liste de variables
2
Réponses
15
Affichages
264
patricko-13
P
M
  • Résolu(e)
XL 2021 Récupérer la valeur d’une cellule dans un classeur fermé
Réponses
5
Affichages
182
patricktoulon
I
  • Résolu(e)
Microsoft 365 Calculer et classer les factures en fonction de leur importance
2 3 4
Réponses
46
Affichages
1 K
job75
C
  • Question Question
Microsoft 365 Est-il possible de concaténer dans une formule ?
Réponses
4
Affichages
460
Cougar
C
P
  • Question Question
XL 2021 Ajout/adaptation de code VBA sur feuille qui en contient déjà
Réponses
3
Affichages
213
Pierreavecunp
P
Z
  • Question Question
Microsoft 365 Exporter le visuel d'une cellule vers un fichier PNG
Réponses
4
Affichages
301
patricktoulon
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…