Medan text till tal är ett viktigt verktyg för synskadade användare , det är också ett användbart verktyg för att korrekturläsa ett dokument som du har läst många gånger genom att lyssna på talad text . Däremot ger Microsoft Word 2007 inte ett sätt att lansera talsyntes inifrån programmet . För att komma runt detta , utnyttjar användaren utvecklade makron som du kan lägga till Word så att du kan starta , pausa och stoppa text till tal nytta med alla Word-dokument . Instruktioner Review, Skapa makron
1
Launch Microsoft Word 2007 , välj " Developer " och välj sedan " Visual Basic " från bandet bar .
2
välj " Verktyg ", klicka " Makron ... " och sedan välja " Normal " från listan kryssrutan Skriv ett makro namnet " makron i . " - till exempel , " TTS " - och sedan klicka på " Skapa " knappen
3
Kopiera koden nedan genom att markera det och trycka " Ctrl - C " :
Option ExplicitDim tal . som SpVoiceDim I As Integer
Sub SpeakText ( ) On Error Resume NextIf i = 0 ThenSet tal = Ny SpVoiceIf Len ( Selection.Text ) > 1 Then ' tala selectionspeech.Speak Selection.Text , _SVSFlagsAsync + SVSFPurgeBeforeSpeakElse ' talar hela documentspeech.Speak ActiveDocument.Range ( 0 , _ActiveDocument.Characters.Count ) . Text , _SVSFlagsAsync + SVSFPurgeBeforeSpeakEnd IfElseIf i = 1 Thenspeech.Resumei = 0End IfEnd IfEnd Sub
Sub StopSpeaking ( ) On Error Resume Nextspeech . tala vbNullString , SVSFPurgeBeforeSpeakSet tal = Nothingi = 0End Sub
Sub PauseSpeaking ( ) On Error Resume NextIf i = 0 Thenspeech.pausei = 1ElseIf i = 1 Thenspeech.Resumei = 0End IfEnd IfEnd Sub
4
Klicka på makrot fönster i Word , tryck "Ctrl - A , " och tryck sedan på " Ctrl - V " för att klistra in makron i editorn . Välj " File " och klicka sedan på " Spara Normal . "
5
Klicka på " Tools " i menyn och välj sedan " Referenser ... " Leta Microsoft Speech Object Library , markera rutan bredvid den och välj sedan " OK ". Välj " Arkiv " -menyn och välj sedan " Stäng och gå tillbaka till Microsoft Word . "
6
Välj "Visa " från Word-menyn , välj " makron " och klicka sedan på Bekräfta att du har tre makron visar för text till tal " Visa makron . " : PauseSpeaking , SpeakText och StopSpeaking . Välj " Avbryt " för att stänga fönstret .
Set Up Snabbåtkomst
7
Klicka på nedåtpilen på verktygsfältet Snabbåtkomst ovanför Word-menyn , och sedan välj " Fler kommandon ... "
8
Välj " Makron " i listrutan märkt " Välj kommandon från . " Klick " Normal.Module1.SpeakText " i listan makron , och klicka sedan på " lägg till >> " knappen för att lägga till det i verktygsfältet Snabbåtkomst . Välj " Ändra ... " och sedan välja en lämplig ikon för att tala text .
9
Upprepa det föregående steget för " Normal.Module1.PauseSpeaking " och " Normal.Module1 . StopSpeaking " makron . Klicka på " OK " när du är klar för att spara dina ändringar .
10
Öppna ett dokument . Klicka på ikonen i verktygsfältet Snabbåtkomst som motsvarar SpeakText makro för att bekräfta att Word läser texten . Testa PauseSpeaking och StopSpeaking makron för att bekräfta att de fungerar korrekt .
