Estoy intentando rellenar una hoja de cálculo de Excel con controles que reproduzcan ejemplos de archivos de audio sobre cómo pronunciar una lista de palabras.
Si el contenido de A1 es "introduce", quiero que Excel reproduzca un archivo de audio llamado introduce.m4a cuando (digamos) se pulse un botón en B1. I no quiere que el sonido sea reproducido por una aplicación externa o por otra ventana del navegador.
He encontrado bastante código VBA que reproduce un sonido provocado por eventos en una hoja de cálculo de Excel, pero ninguno que obtenga el nombre del archivo de audio de una celda de la hoja.
Sub Playm4a()
Application.ScreenUpdating = False
On Error Resume Next
ActiveSheet.OLEObjects.Add(Filename:=ActiveCell.Text, Link:=True).Select
If Err.Number <> 0 Then
Application.ScreenUpdating = True
MsgBox "Could not play " & ActiveCell.Text
Exit Sub
End If
Selection.Verb
Selection.Delete
End Sub¡Gracias de antemano por cualquier ayuda!
