Como configurar o texto para fala no escritório ms 2007, utilizando macros

Criar macros

1. Lançamento do Microsoft Word 2007, escolha "Desenvolvedor," em seguida, selecione "Visual básico" a partir da barra de fita.

2. Escolher "Ferramentas," clique "Macros ...," em seguida, selecione "Normal" da caixa de lista rotulada "Macros em." Digite um nome de macro - por exemplo, "TTS" - E, em seguida, clique no "Crio" botão.

3. Copie o código abaixo, destacando-o e pressionando "Ctrl-C":

   Option Explicit
   discurso Dim Como SpVoice
   Dim i As Integer

   Sub SpeakText ()
   On Error Resume Next
   Se i = 0 Then
   Definir discurso = Novo SpVoice
   Se Len (Selection.Text) gt; 1 Then `selecção falar
   speech.Speak Selection.Text,
   SVSFlagsAsync + SVSFPurgeBeforeSpeak
   Else `falar documento inteiro
   speech.Speak ActiveDocument.Range (0,

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

   Fim se
   Outro
   Se i = 1, então
   speech.Resume
   i = 0
   Fim se
   Fim se
   End Sub

   
   
   
   

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

   Sub PauseSpeaking ()
   On Error Resume Next
   Se i = 0 Then
   speech.pause
   i = 1
   Outro
   Se i = 1, então
   speech.Resume
   i = 0
   Fim se
   Fim se
   End Sub

4. Clique na janela de macro no Word, pressione "Ctrl-A," e pressione "Ctrl-V" para colar as macros para o editor. Escolher "Arquivo," e clique em "Salvar Normal."

5. Clique "Ferramentas" a partir do menu e escolha "Referências..." Localizar a Biblioteca de objetos do Microsoft Speech, marque a caixa ao lado dele, em seguida, selecione "ESTÁ BEM." Selecione os "Arquivo" menu e, em seguida, escolha "Fechar e retornar ao Microsoft Word."

6. Escolher "Visão" a partir do menu do Word, selecione "macros," e clique em "Veja as macros." Confirme se você tem três macros exibindo para texto em fala: PauseSpeaking, SpeakText e StopSpeaking. Escolher "Cancelar" para fechar a janela.

Configurar Barra de Acesso Rápido

1. Clique na seta para baixo na barra de ferramentas de acesso rápido acima do menu do Word e, em seguida, selecione "Mais Comandos ..."

2. selecionar "macros" na caixa de lista rotulada "Escolha comandos." Clique "Normal.Module1.SpeakText" na lista de macros e, em seguida, clique no "Adicionar gt; gt;" botão para adicioná-lo à barra de ferramentas de acesso rápido. selecionar "Modificar...," e, em seguida, escolher um ícone apropriado para falar o texto.

3. Repita o passo anterior para o "Normal.Module1.PauseSpeaking" e "Normal.Module1.StopSpeaking" macros. Clique "Está bem" quando feito para salvar as alterações.

4. Abra um documento. Clique no ícone na barra de acesso rápido que corresponde à macro SpeakText para confirmar que o Word lê o texto. Testar as macros PauseSpeaking e StopSpeaking para confirmar que eles funcionem corretamente.