Música de fondo en un userform

Este es el código que debes poner en tu formulario

Private Declare Function mciExecute Lib "winmm.dll" (ByVal Comando As String) As Long

Private Sub UserForm_Activate()
mciExecute "Play C:\musica\tchaikovski-snook.mp3"
End Sub

Private Sub UserForm_Terminate()
mciExecute "Stop C:\musica\tchaikovski-snook.mp3"
End Sub

Este es mi ejemplo:

C:\musica\tchaikovski-snook.mp3

Tú debes poner la ruta y el nombre de tu archivo de música

Saludos. Dam

gracias por tu respuesta pero me sale un mensaje que dice que hay un problema al inicializar el MCI... no se si podes soluconarlo