Discussion :

[fring]

Hello Eve rit, Bo dit

J'aurais besoin de quelques volontaires pour me tester le petit code ci-dessous. Il s'agit de faire parler le pc au moyen de la synthèse vocale et je cherche à savoir sur quelles versions d'excel ce bidule fonctionne.
Je peux déjà dire que sur Excel 2000 ça ne fonctionne pas, qu'en est-il des versions 2002, 2003 et 2007 ?

Merci d'avance

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub synt_vocale()
Dim SayThis As String
 
SayThis = "hello thank you for this little test"
Application.Speech.Speak (SayThis)
 
End Sub

[Invité]

Salut Fring

Fonctionne sous Excel 2007.

Starec

[fring]

Fonctionne sous Excel 2007

Salut Starec

[Bernard67]

Bonjour a toutes et tous.

Fonctionne sous 2003 !!

Bonne journée

[wilfried_42]

bonjour à tous

sur 2002 voici le code que j'utilise pour le speacker

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Set gw_Sp = CreateObject("Sapi.SpVoice")
gw_Sp.Speak trouve.Offset(0, 1)

voici le lien sur Le fichier voir fichier Xla
Module : gw_mfc
Procedure : gw_mfc_go
Case 8

trouve.offset(0,1) me renvoie sur la phrase à dicter

pour ta procedure erreur (Application.Speech.Speak (SayThis)): voir fichier joint

[fring]

Bernard et Wilfried

On peut donc en conclure que la fonction Application.Speech.Speak fonctionne depuis la version 2003 et est toujours opérationnelle.

Merci à vous 3 de vous être prêté au jeu
Bonne journée