1 votes

Je veux du code VBA pour faire jouer un fichier son dans Excel Mac 2011 en fonction du nom dans une cellule

Je essaie de remplir une feuille de calcul Excel avec des contrôles qui joueront des exemples audio de comment prononcer une liste de mots.

Si le contenu de A1 est "introduce", je veux qu'Excel joue un fichier audio nommé introduce.m4a lorsque (disons) un bouton dans B1 est appuyé. Je ne veux pas que le son soit joué par une application externe ou une autre fenêtre de navigateur.

J'ai trouvé pas mal de code VBA qui joue un son déclenché par des événements dans une feuille de calcul Excel, mais aucun qui obtient le nom du fichier audio à partir d'une cellule de la feuille.

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

Merci d'avance pour toute aide!

2voto

Vadim Points 136

J'ai trouvé cette question lorsque j'ai essayé de résoudre un problème similaire (créer un cahier de vocabulaire pour apprendre des mots anglais). La solution la plus simple pour moi a été d'utiliser la prononciation vocale intégrée dans MacOS X :

Sub Prononcer_cellule_active()
    MacScript ("dire " & """" & ActiveCell.Value & """")
End Sub

LesApples.com

LesApples est une communauté de Apple où vous pouvez résoudre vos problèmes et vos doutes. Vous pouvez consulter les questions des autres utilisateurs d'appareils Apple, poser vos propres questions ou résoudre celles des autres.

Powered by:

X