lancer un fichier son (ext Au/WA) de Windows Média Player à partir d'une macro

[loic38]

bonjour
en préparation de ma propre macro pour le Fun j'ai besoin de savoir :

comment lancer un fichier d'extension Au à partir d'une macro
même question pour un fichier Wav?


j'ai essayé sur le fichier s1.au l'instruction suivante, mais excel refuse

WAVFile = ThisWorkbook.Path & "\" & "s1.au"
Call PlaySound32(WAVFile, 0&, SND_ASYNC Or SND_FILENAME)


merci d'apporter votre pierre à mon objectif (VOIR MACRO POUR LE FUN°

A BIENTOT

 

[Michel_M]

Salut Loîc

En apportant mon écot pour l'objectif 100, je t'ai envoyé un son wav (coucou) commandé par macro; donc...

En espèrant voir d'autres macros pour le fun, excellente idée

Michel

 

[Eric C]

Bonjour le forum
Bonjour loic38 & Michel_M

Un code qui vient de Mytä si mes souvenirs sont bons

Dans un module

Declare Function sndPlaySound32 Lib "winmm.dll" Alias _
"sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Sub Play()
Call sndPlaySound32("C:\Windows\Media\Tada.wav", 0) ==>A adapter
End Sub

Pas bien réveillé le lundi de Pâques les Forumeurs & Forumeuses pour répondre à ta requête. Fini la grasse, réveillez vous & repartez sur le post de Loic38 qui sollicite TOUT le MONDE .....

>http://www.excel-
downloads.com/html/French/forum/messages/1_82415_82415.htm<

Allez ... à vos macros et plus vite que cela, de toute façon je relève les noms , celui qui ne répond pas sera puni de Forum pendant 15 jours...
On a peur ... hein ! alors au boulot & plus vite que ça...lol...

@ ++ Eric C

 

[Eric C]

Re à tous & à toutes

Celui qui ne possède pas la finesse du savoir faire possède au moins le clic droit de la souris ...lol ...

<http://www.excel-
downloads.com/html/French/forum/messages/1_82415_82415.htm>

@++ Eric C

 

[Eric C]

Re à tous & à toutes

Bon, j'ai du oublier quelque chose, d'habitude cela fonctionne ???
Je vais donc arrêter pour ce soir pour rejoindre ma moitié.

@ ++ Eric C

 

[loic38]

bonjour
pas de chance avec la macro que tu m'as envoyé
qd je la lance
voici le message que j'obtiens

Point d'entrée SndplaySound32 d'une DLL introuvable dans winmm.dll

précision : je suis sur XP

sais tu ce que veut dire ce message

 

[Eric C]

Bonjour le forum
Bonjour Loic38

Sous XL 97 & 2000 , aucun problème. Il te manques une DLL que tu peux rechercher sur le net DLL.Com
@ ++ Eric C