Πως να ρυθμίσετε το κείμενο σε ομιλία στο MS Office 2007 Χρήση μακροεντολών

Ενώ το κείμενο στην ομιλία είναι ένα σημαντικό εργαλείο για τους χρήστες με προβλήματα όρασης , είναι επίσης ένα χρήσιμο εργαλείο για τη θωράκιση ένα έγγραφο που έχετε διαβάσει πολλές φορές ακούγοντας το προφορικό κείμενο . Ωστόσο, το Microsoft Word 2007 δεν παρέχει έναν τρόπο για να ξεκινήσει το κείμενο στην ομιλία μέσα από το πρόγραμμα . Για να πάρετε γύρω από αυτό , χρησιμοποιούν μακροεντολές χρήστη αναπτυχθεί που μπορείτε να προσθέσετε στο Word για να σας δώσει τη δυνατότητα να ξεκινήσει , παύση και να σταματήσει το κείμενο για την χρησιμότητα ομιλία με οποιοδήποτε έγγραφο του Word . Οδηγίες
Δημιουργία μακροεντολών

1

Εκκίνηση του Microsoft Word 2007 , επιλέξτε " Developer " και στη συνέχεια επιλέξτε " Visual Basic" από τη γραμμή ταινία . 2

Επιλέξτε " Εργαλεία ", κάντε κλικ στο κουμπί " Μακροεντολές ... " και στη συνέχεια επιλέξτε " Normal" από το πλαίσιο λίστας επισημαίνονται Πληκτρολογήστε ένα όνομα μακροεντολής " Μακροεντολές In. » - για παράδειγμα , " TTS " - και στη συνέχεια κάντε κλικ στο κουμπί "Δημιουργία "
εικόνων 3

Αντιγράψτε τον παρακάτω κώδικα με έμφαση και πατώντας " Ctrl - C " :

Επιλογή ExplicitDim ομιλία . Όπως SpVoiceDim i As Integer

Sub SpeakText ( ) On Error Resume NEXTIF i = 0 ThenSet ομιλία = Νέα SpVoiceIf Len ( Selection.Text ) > 1 Then ' μιλούν selectionspeech.Speak Selection.Text , _SVSFlagsAsync + SVSFPurgeBeforeSpeakElse » μιλούν ολόκληρη documentspeech.Speak ActiveDocument.Range ( 0 , _ActiveDocument.Characters.Count ) . κείμενο , _SVSFlagsAsync + SVSFPurgeBeforeSpeakEnd IfElseIf i = 1 Thenspeech.Resumei = 0End IfEnd IfEnd Sub

Sub StopSpeaking ( ) On Error Resume Nextspeech . Μιλήστε vbNullString , SVSFPurgeBeforeSpeakSet ομιλία = Nothingi = 0End Sub

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

Κάντε κλικ στο μακροοικονομικό παράθυρο στο Word , πιέστε το πλήκτρο " Ctrl - A , " και στη συνέχεια πατήστε το πλήκτρο " Ctrl - V " για να επικολλήσετε τις μακροεντολές στον επεξεργαστή . Επιλέξτε "Αρχείο " και στη συνέχεια κάντε κλικ στο κουμπί " Αποθήκευση Normal ".
5

Κάντε κλικ στο " Εργαλεία" από το μενού , και στη συνέχεια επιλέξτε "Αναφορές ... " Εντοπίστε ομιλίας της Microsoft βιβλιοθήκη αντικειμένων , επιλέξτε το πλαίσιο δίπλα σε αυτό , και στη συνέχεια, επιλέξτε " ΟΚ ". Επιλέξτε το μενού "Αρχείο" , και στη συνέχεια επιλέξτε " Κλείσιμο και επιστροφή στο Microsoft Word . "
Η 6

Επιλέξτε " View" από το μενού του Word , επιλέξτε " μακροεντολές ", και στη συνέχεια κάντε κλικ στο κουμπί "Προβολή μακροεντολών . " Επιβεβαιώστε ότι έχετε τρεις μακροεντολές εμφάνιση κειμένου σε ομιλία : PauseSpeaking , SpeakText και StopSpeaking . Επιλέξτε " Ακύρωση" για να κλείσετε το παράθυρο .
Εικόνων Ρύθμιση γραμμής εργαλείων γρήγορης πρόσβασης
Η

7 Κάντε κλικ στο κάτω βέλος στη γραμμή εργαλείων γρήγορης πρόσβασης πάνω από το μενού του Word , και στη συνέχεια επιλέξτε " Περισσότερες εντολές ... "
8

Επιλέξτε " Μακροεντολές " στο πλαίσιο λίστας με την ένδειξη " Επιλογή εντολών από . " Κάντε κλικ στο " Normal.Module1.SpeakText " στη λίστα μακροεντολές , και στη συνέχεια κάντε κλικ στο κουμπί "Προσθήκη >> " για να το προσθέσετε στη γραμμή εργαλείων γρήγορης πρόσβασης . Επιλέξτε "Τροποποίηση ... , " και στη συνέχεια επιλέξτε ένα κατάλληλο εικονίδιο για την ομιλία του κειμένου.
Η 9

Επαναλάβετε το προηγούμενο βήμα για την « Normal.Module1.PauseSpeaking " και " Normal.Module1 . StopSpeaking " μακροεντολές . Κάντε κλικ στο " OK " όταν τελειώσετε για να αποθηκεύσετε τις αλλαγές σας .
Η 10

Ανοίξτε ένα έγγραφο . Κάντε κλικ στο εικονίδιο στη γραμμή εργαλείων γρήγορης πρόσβασης που αντιστοιχεί στο μακρο SpeakText για να επιβεβαιώσετε ότι το Word διαβάζει το κείμενο . Δοκιμάστε τα PauseSpeaking και StopSpeaking μακροεντολές για να επιβεβαιώσει ότι λειτουργεί σωστά .
Η
εικόνων