Mens tekst til tale er et viktig verktøy for synshemmede brukere , er det også et nyttig verktøy for korrektur et dokument som du har lest mange ganger ved å lytte til det talte teksten . Men ikke Microsoft Word 2007 gir ikke en måte å lansere tekst til tale fra programmet . For å komme rundt dette , utnytte brukeren utviklede makroer som du kan legge til Word slik at du kan starte , pause og stoppe tekst til tale-verktøy med et Word-dokument . Instruksjoner , Lag makroer
en

Launch Microsoft Word 2007 , velg " Developer ", og velg " Visual Basic" fra båndet bar .
2

velg "Verktøy " klikk " Makroer ... ", og velg " Normal " fra listen boksen Skriv inn et makro navnet " Makroer In. " - for eksempel " TTS " - og klikk deretter på "Create "-knappen
3

Kopier koden under ved å markere det og trykke "Ctrl - C" : en

Option ExplicitDim tale. som SpVoiceDim i As Integer

Sub SpeakText ( ) On Error Resume NextIf i = 0 ThenSet tale = Ny SpVoiceIf Len ( Selection.Text ) > 1 Then ' snakke selectionspeech.Speak Selection.Text , _SVSFlagsAsync + SVSFPurgeBeforeSpeakElse ' snakke hele documentspeech.Speak ActiveDocument.Range ( 0 , _ActiveDocument.Characters.Count ) . tekst , _SVSFlagsAsync + SVSFPurgeBeforeSpeakEnd IfElseIf i = 1 Thenspeech.Resumei = 0End IfEnd IfEnd Sub

Sub StopSpeaking ( ) On Error Resume Nextspeech . Snakk vbNullString , SVSFPurgeBeforeSpeakSet tale = Nothingi = 0End Sub

Sub PauseSpeaking ( ) On Error Resume NextIf i = 0 Thenspeech.pausei = 1ElseIf i = 1 Thenspeech.Resumei = 0End IfEnd IfEnd Sub
4

Klikk i makro vinduet i Word, trykk " Ctrl -A ", og trykk deretter "Ctrl - V" for å lime inn makroer inn i editoren . Velg "File " og deretter " Lagre Normal. "
5

Klikk "Verktøy " fra menyen , og velg deretter "Referanser ... " Finn Microsoft Speech Object Library , merk av i boksen ved siden av, og velg deretter " OK ." Velg "File "-menyen , og velg deretter " Lukk og gå tilbake til Microsoft Word . "
6

Velg "View" fra Word -menyen , velg " makroer ", og klikk deretter Bekreft at du har tre makroer viser for tekst til tale " Vis makroer . " : PauseSpeaking , SpeakText og StopSpeaking . Velg "Avbryt " for å lukke vinduet .
Set Up Hurtigverktøylinje
7

Klikk pil ned på verktøylinjen for hurtigtilgang over Word-menyen og deretter velg "Flere kommandoer ... "
8

Velg " Makroer " i listen boksen merket " Velg kommandoer fra ." Klikk " Normal.Module1.SpeakText " i listen av makroer , og klikk deretter på "Legg til >> "-knappen for å legge den til på verktøylinjen for hurtigtilgang . Velg "Endre ... ", og velg deretter et passende ikon for å snakke tekst .
9

Gjenta forrige trinn for " Normal.Module1.PauseSpeaking " og " Normal.Module1 . StopSpeaking " makroer . Klikk "OK" når du er ferdig for å lagre endringene .
10

Åpne et dokument . Klikk på ikonet i verktøylinjen for hurtigtilgang som tilsvarer SpeakText makro for å bekrefte at Word leser teksten . Test PauseSpeaking og StopSpeaking makroer for å bekrefte at de fungerer korrekt .