Estoy intentando rellenar una hoja de cálculo de Excel con controles que reproducirán ejemplos de archivos de audio sobre cómo pronunciar una lista de palabras.
Si el contenido de A1 es "introducir", quiero que Excel reproduzca un archivo de audio llamado introducir.m4a cuando (por ejemplo) se presiona un botón en B1. No no quiero que el sonido se reproduzca en una aplicación externa u otra ventana del navegador.
Encontré una buena cantidad de código VBA que reproduce un sonido desencadenado 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!