Ecouter des .wma

Bonjour le forum,

J'ai un userform sur lequel se trouve un bouton.
Je voudrais ecouter un fichier wave lorsque je clique sur le bouton de mon userform.
J'ai essayé le code suivant mais rien ne se passe (pas d'erreur, ni de plantage) :

Declare Function PlaySound Lib "Winmm" _
(ByVal pszSound As String, ByVal hmod As Long, ByVal fdwSound As Long) As Long

Sub Test()
PlaySound "C:\Music\test01.wma", 0, 0
End Sub

J'ai ce probleme sur Excel 2003 et 2007.
Merci d'avance pour vos reponses