Crear Macros
1
 lanzamiento Microsoft Word 2007, seleccione " Programador " y luego seleccione " Visual Basic " de la barra de la cinta. 
 2 
 seleccione la opción " Herramientas ", haga clic en " macros ... ", y luego seleccione " normal" en el cuadro de lista con la etiqueta Escriba un nombre de macro " macros en . " - por ejemplo, " TTS " - y luego haga clic en el botón "Crear " 
 3 
 Copie el código de abajo , poniendo de relieve y presionando "Ctrl -C ": 
 
 Opción discurso ExplicitDim . Como SpVoiceDim i As Integer 
 
 Sub SpeakText () On Error Resume NEXTIF i = 0 ThenSet voz = New SpVoiceIf Len ( Selection.Text ) > 1 Entonces ' habla selectionspeech.Speak Selection.Text , _SVSFlagsAsync + SVSFPurgeBeforeSpeakElse ' decir toda documentspeech.Speak ActiveDocument.Range ( 0 , _ActiveDocument.Characters.Count ) . Texto, _SVSFlagsAsync + SVSFPurgeBeforeSpeakEnd IfElseIf i = 1 = Thenspeech.Resumei 0End IfEnd IfEnd Sub 
 
 Sub StopSpeaking () On Error Resume Nextspeech . Hable vbNullString , el habla SVSFPurgeBeforeSpeakSet = Nothingi = 0End Sub 
 
 Sub PauseSpeaking () On Error Resume NEXTIF i = 0 = Thenspeech.pausei 1ElseIf i = 1 = Thenspeech.Resumei 0End IfEnd IfEnd Sub 
 4 
 Haga clic en la ventana de macros en Word, presione "Ctrl -A ", y luego presione " Ctrl + V " para pegar las macros en el editor. Seleccione " Archivo" y luego haga clic en " Guardar Normal. " 
 5 
 Haga clic en " Herramientas " en el menú , a continuación, seleccione "Referencias ... " Localizar Microsoft Speech Biblioteca de objetos , marque la casilla junto a él , a continuación, seleccione "OK ". Seleccione el menú "Archivo" y seleccione " Cerrar y volver a Microsoft Word. " 
 6 
 seleccione la opción " Ver " del menú de Word, seleccione " macros " y, a continuación, haga clic en Confirmar que tiene tres macros se presentan para texto a voz " Ver macros. ": PauseSpeaking , SpeakText y StopSpeaking . Seleccione la opción " Cancelar " para cerrar la ventana. 
 Configurar barra de herramientas de acceso rápido 
 7 
 Haga clic en la flecha hacia abajo en la barra de herramientas de acceso rápido sobre el menú Word, y luego seleccione " Más comandos ... " 
 8 
 Seleccione " Macros " en el cuadro de lista denominado " comandos disponibles . " Click " Normal.Module1.SpeakText " en la lista de macros y , a continuación, haga clic en " Add >> " para añadirlo a la barra de herramientas de acceso rápido. Seleccione " Modificar ... " y, a continuación, seleccione un icono apropiado para hablar de texto. 
 9 
 Repita el paso anterior para el " Normal.Module1.PauseSpeaking " y " Normal.Module1 . "macros StopSpeaking . Haga clic en " Aceptar " cuando haya terminado de guardar los cambios . 
 10 
 Abra un documento. Haga clic en el icono en la barra de herramientas de acceso rápido correspondiente a la SpeakText macro para confirmar que la Palabra dice el texto. Pruebe las macros PauseSpeaking y StopSpeaking para confirmar su correcto funcionamiento . 
 
 
          
