Vuoi codice VBA per far sì che Excel Mac 2011 riproduca il file audio in base al nome in una cella

1

Sto cercando di compilare un foglio di lavoro Excel con controlli che riproducano esempi di file audio su come pronunciare un elenco di parole.

Se il contenuto di A1 è "introduce", voglio che Excel riproduca un file audio denominato introduce.m4a quando (per esempio) viene premuto un pulsante in B1. Io non voglio il suono riprodotto da un'app esterna o da un'altra finestra del browser.

Ho trovato un bel po 'di codice VBA che riproduce un suono attivato da eventi in un foglio di lavoro Excel, ma nessuno che ottiene il nome del file audio da una cella nel foglio.

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

Grazie in anticipo per qualsiasi aiuto!

    
posta David Knapp 13.05.2016 - 04:25
fonte

1 risposta

2

Trovata questa domanda quando si è tentato di risolvere il problema simile (creando un quaderno di vocabolario per l'apprendimento delle parole inglesi). La soluzione più semplice per me era usare la pronuncia della voce incorporata in MacOS X:

Sub Pronounce_active_cell()
    MacScript ("say " & """" & ActiveCell.Value & """")
End Sub
    
risposta data 27.02.2017 - 16:06
fonte

Leggi altre domande sui tag