Ayuda con macro para colocar musica en userform

[jcjones]

Buenos días

deseo colocar un sonido en un UserForm pero no he podido.

Que cuando se ejecute suene.

Musica-Balota.rar

[Antoni]

¿ Que tipo de archivo ? wav, mp3.

Concreta un poco mas.

[jcjones]

Es un archivo Wav.

Mucha gracias por contestar.

P.D.

Me puedes decir como tratar este tema ya cerrados.

Ayuda con macro para colocar Titulos, cuando le coloco 50 articulos me da error una veces y otras no en la suma total que aparece al final( Valor total del presupuesto)

[Antoni]

Coloca este código en un módulo:

Private Declare Function PlaySound Lib "winmm.dll" _

Alias "PlaySoundA" (ByVal lpszName As String, _

ByVal hModule As Long, ByVal dwFlags As Long) As Long


Const SND_SYNC = &H0

Const SND_ASYNC = &H1

Const SND_FILENAME = &H20000


Sub REPRODUCIR_SONIDO()

RUTA = "C\Música.wav"

Call PlaySound(RUTA, 0&, SND_ASYNC Or SND_FILENAME)

End Sub


[/CODE]

En cuanto a la 2ª consulta, abre un tema nuevo con el link del viejo.

.

[jcjones]

No se que estoy haciendo mal ya que copie el codigo en un modulo y cambie el nombre del archivo de musica en la ruta y lo coloque en C:

Pero no reproduce el sonido.

Podrias usar el ejemplo que te envie.

Gracias.

[Antoni]

Así me funciona correctamente.

El archivo .wav debe estar en el mismo directorio que el archivo Excel.

Musica-Balota.rar

[jcjones]

Mucha gracias.

Disculpa la demora en contestar.

Estaba tratando de adaptarlo a este ejemplo, pero no he podido.( es un juego para los hijos )

Lo que deseo es que la musica suene al mismo momento que me muestra el numero del bingo.

No he podido colocarlo en el boron de la balota por eso hay dos.

Musica Balota I.rar

[Antoni]

Recuerda que debe existir un archivo con el nombre Bingo Balota.WAV en el mismo directorio

donde tengas el archivo Excel.

Musica Balota II.rar

[jcjones]

Muchas gracias

Funciono perfectamente, lo disfrutaremos este fin de semana con los hijos y sobrinos.

Nuevamente muchas gracias y doy por terminado el tema.

En cuanto al otro asunto, mañana hare la pregunta.