XL pour MAC Voix de synthèse

Nihil

XLDnaute Nouveau
Bonjour à tous et d'avance, merci pour votre éventuelle aide.
Ma question: y-a-t-il moyen de disposer d'une voix de synthèse dans Excel?
Explication: j'ai concocté une liste d'expressions anglaises que j'oublie régulièrement, de façon à les répéter.
Tout simple: colonne 1 l'expression en français, colonne 2 la traduction en anglais.
Existe-t-il un moyen d'ajouter une voix de synthèse anglaise à la colonne 2, qui s'activerait lorsque je clique la cellule ad hoc (ou d'une autre façon)?
Cordialement
Christian
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Nihil,
Avec ou sans l'accent ?
C'est simple si vous vous contentez d'une voix synthétique, avec :
VB:
Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo Fin
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("A1:B1000")) Is Nothing Then
        If Target <> "" Then Application.Speech.Speak Range(Target.Address)
    End If
Fin:
End Sub
mais il existe surement mieux, wait and see !:)
 

Pièces jointes

  • FrEn.xlsm
    13.5 KB · Affichages: 4

Statistiques des forums

Discussions
315 090
Messages
2 116 106
Membres
112 661
dernier inscrit
ceucri