Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Dim msg, sapi
 MsgBox ("ecrire le texte a prononcer :-)")
 msg1 = InputBox ("Enter")
 Set sapi = CreateObject ("sapi.spvoice")
 sapi.Speak msg1
ce code fait parler le pc avec un texte saisie par l'utilisateur mais en anglais.
je veut savoir comment le faire parler en français.

merci pour vos réponses...