Comment configurer le texte à la parole en fonction de ms 2007 en utilisant des macros

Création de macros

1. Lancez Microsoft Word 2007, choisissez "Développeur," puis sélectionnez "Visual Basic" dans la barre de ruban.

2. Choisir "Outils," cliquez "Macros ...," puis sélectionnez "Ordinaire" dans la zone de liste intitulée "Macros In." Tapez un nom de macro - par exemple, "TTS" - Et puis cliquez sur le "Créer" bouton.

3. Copiez le code ci-dessous en le sélectionnant et en appuyant sur "Ctrl-C":

   Option Explicit
   discours Dim Comme SpVoice
   Dim i As Integer

   Sous SpeakText ()
   On Error Resume Next
   Si i = 0 Then
   Régler la parole = New SpVoice
   Si Len (Selection.Text) gt; 1 Ensuite, la «sélection de parler
   speech.Speak Selection.Text,
   SVSFlagsAsync + SVSFPurgeBeforeSpeak
   Else `exprimer tout le document
   speech.Speak ActiveDocument.Range (0,

   
   
   
   
   

   ActiveDocument.Characters.Count) .Text, _
   SVSFlagsAsync + SVSFPurgeBeforeSpeak

   Fin si
   Autre
   Si i = 1 Ensuite,
   speech.Resume
   i = 0
   Fin si
   Fin si
   End Sub

   Sous StopSpeaking ()
   On Error Resume Next
   speech.Speak vbNullString, SVSFPurgeBeforeSpeak
   Set discours = Nothing
   i = 0
   End Sub

   Sous PauseSpeaking ()
   On Error Resume Next
   Si i = 0 Then
   speech.pause
   i = 1
   Autre
   Si i = 1 Ensuite,
   speech.Resume
   i = 0
   Fin si
   Fin si
   End Sub

4. Cliquez dans la fenêtre de macro dans Word, appuyez sur "Ctrl-A," puis appuyez sur "Ctrl-V" pour coller les macros dans l`éditeur. Choisir "Fichier," puis cliquez sur "Enregistrer Normal."

5. Cliquez "Outils" dans le menu, puis choisissez "Les références..." Localisez Microsoft Speech Object Library, cochez la case à côté de lui, puis sélectionnez "D`ACCORD." Sélectionnez le "Fichier" menu, puis choisissez "Fermer et retourner à Microsoft Word."

6. Choisir "Vue" dans le menu Word, sélectionnez "Macros," puis cliquez sur "Voir Macros." Vérifiez que vous disposez de trois macros affichant pour le texte à la parole: PauseSpeaking, SpeakText et StopSpeaking. Choisir "Annuler" pour fermer la fenêtre.

Configuration d`outils Accès rapide

1. Cliquez sur la flèche vers le bas sur la barre d`outils Accès rapide au-dessus du menu Word, puis sélectionnez "Plus de commandes ..."

2. Sélectionner "Macros" dans la zone de liste intitulée "Choisissez des commandes à partir." Cliquez "Normal.Module1.SpeakText" dans la liste des macros, puis cliquez sur le "Ajouter gt; gt;" bouton pour l`ajouter à la barre d`outils Accès rapide. Sélectionner "Modifier...," puis choisissez une icône appropriée pour le texte parlant.

3. Répétez l`étape précédente pour la "Normal.Module1.PauseSpeaking" et "Normal.Module1.StopSpeaking" macros. Cliquez "D`accord" lorsque vous avez terminé pour enregistrer vos modifications.

4. Ouvrez un document. Cliquez sur l`icône dans la barre d`outils Accès rapide qui correspond à la macro SpeakText pour confirmer que Word lit le texte. Testez les PauseSpeaking et StopSpeaking macros pour confirmer qu`ils fonctionnent correctement.