comment déclencher la lecture d un fichier mp3
lorsque la cellule A1=100
et merci d avance chers amis de votre aide.
comment déclencher la lecture d un fichier mp3
lorsque la cellule A1=100
et merci d avance chers amis de votre aide.
Bonjour
Un peu de lecture : http://silkyroad.developpez.com/VBA/WindowsMediaPlayer/
Philippe
Bonjour,
Je dirais que si la machine peut lire un MP3, c'est qu'un outil pour ce faire y est installé et que cet outil est utilisé par défaut pour la lecture...
Dans ce cas, tout bêtement :
Pour déclencher si la valeur d'une cellule est celle de ton choix, tu adaptes comme tu l'entends ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Option Explicit Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Private Sub Command1_Click() Dim ta_zizique As String, voir As Integer voir = 1 ' si tu veux écouter en voyant l'outil 'voir = 0 ' si tu veux écouter sans voir l'outil ta_zizique = "d:\musique\titis\toto.mp3" ShellExecute 0, "open", ta_zizique, vbNullString, "c:\", voir End Sub
merci bcp
Problème résolu?
Bouton, en bas de discussion.
Merci
N'oubliez pas de cliquer surquand vous avez obtenu ou trouvé vous-même la réponse à votre question.
Si vous trouvez seul, pensez à poster votre solution. Elle peut servir à d'autres!
Pensez aussi à voter pour les réponses qui vous ont aidés.
------------
Je dois beaucoup de mes connaissances à mes erreurs!
Partager