Τρόπος εφαρμογής του αυτοματισμού για χρήση της λειτουργίας "Κείμενο σε ομιλία" (Text To Speech) του Excel σε άλλο πρόγραμμα του Office

Αναγν. άρθρου: 287120 - Δείτε τα προϊόντα στα οποία αναφέρεται το συγκεκριμένο άρθρο.
Μηχανικά μεταφρασμένοΠΡΟΕΙΔΟΠΟΙΗΣΗ: ΑΥΤΟ ΤΟ ΑΡΘΡΟ ΜΕΤΑΦΡΑΣΤΗΚΕ ΜΕ ΜΗΧΑΝΙΚΗ ΜΕΤΑΦΡΑΣΗ
Ανάπτυξη όλων | Σύμπτυξη όλων

Σε αυτήν τη σελίδα

Περίληψη

Αυτό το άρθρο βήμα προς βήμα εξηγεί πώς μπορείτε να χρησιμοποιήσετε τις λειτουργίες ανάγνωσης κειμένου του Microsoft Excel σε άλλα προγράμματα, όπως το Microsoft Word, το Microsoft PowerPoint και το Microsoft Outlook.

Το Microsoft Excel είναι το μοναδικό πρόγραμμα του Microsoft Office XP που έχει δυνατότητες ενσωματωμένο κείμενο σε ομιλία (TTS). Αυτό το άρθρο εξηγεί πώς μπορείτε να χρησιμοποιήσετε αυτοματισμού OLE για την πρόσβαση μέσω προγραμματισμού στο μοντέλο αντικειμένου του Excel και να χρησιμοποιήσετε τις λειτουργίες ανάγνωσης κειμένου σε άλλα προγράμματα.

Η Microsoft παρέχει παραδείγματα προγραμματισμού μόνο για λόγους επεξήγησης, χωρίς να παρέχει καμία εγγύηση, σιωπηρή ή ρητή. Σε αυτά περιλαμβάνονται, ενδεικτικά, οι σιωπηρές εγγυήσεις εμπορευσιμότητας ή/και καταλληλότητας για συγκεκριμένο σκοπό. Αυτό το άρθρο προϋποθέτει ότι είστε εξοικειωμένοι με τη γλώσσα προγραμματισμού που παρουσιάζεται, καθώς και με τα εργαλεία που χρησιμοποιούνται για τη δημιουργία και τον εντοπισμό σφαλμάτων κώδικα διαδικασιών. Οι μηχανικοί υποστήριξης της Microsoft μπορούν να σας εξηγήσουν τη λειτουργικότητα μιας συγκεκριμένης διαδικασίας, αλλά δεν θα τροποποιήσουν αυτά τα παραδείγματα, για να παράσχουν πρόσθετες λειτουργίες, ούτε θα δημιουργήσουν διαδικασίες, για να καλύψουν τις συγκεκριμένες απαιτήσεις σας.

Χρήση της ανάγνωσης κειμένου στο PowerPoint

Το ακόλουθο παράδειγμα χρησιμοποιεί το μοντέλο αντικειμένου του Excel για πρόσβαση ανάγνωσης κειμένου από μια παρουσίαση του PowerPoint. Αυτή η διαδικασία δείχνει πώς μπορείτε να αναφέρετε και να δημιουργήσετε μιαExcelΓια να χρησιμοποιήσετε το αντικείμενο τουΟμιλίαObject.

Εισαγάγετε μια λειτουργική μονάδα σε μια παρουσίαση του PowerPoint

  1. Ανοίξτε μια παρουσίαση του PowerPoint.
  2. Πατήστε το συνδυασμό πλήκτρων ALT+F11, για να ξεκινήσει η Επεξεργασία της Visual Basic (Visual Basic Editor).
  3. Στο διακομιστήINSERTμενού, κάντε κλικ στο κουμπίModule.
  4. Πληκτρολογήστε ή αντιγράψτε και επικολλήστε το δείγμα κώδικα που θα εμφανιστεί αργότερα σε αυτήν την ενότητα στη λειτουργική μονάδα.

Προσθέστε μια αναφορά σε 10 βιβλιοθήκη αντικειμένων του Excel

  1. Στην επεξεργασία της Visual Basic, τοποθετήστε το δείκτηΑναφορέςΣτο διακομιστήΕργαλείαΜενού (Menu).
  2. underΔιαθέσιμες αναφορές, κάντε κλικ για να επιλέξετε τοΒιβλιοθήκη αντικειμένων του Microsoft Excel 10.0πλαίσιο ελέγχου και, στη συνέχεια, κάντε κλικ στο κουμπίOk.

Δευτερεύουσα διαδικασία για την αυτοματοποίηση Excel κείμενο σε ομιλία από το PowerPoint

Το ακόλουθο παράδειγμα προϋποθέτει ότι η παρουσίαση του PowerPoint διαθέτει δύο διαφάνειες.
Sub demoTTS()
    
    'Declare and create an Excel object.
    Dim XL As Excel.Application
    Set XL = CreateObject("Excel.Application")
    
    ActivePresentation.SlideShowSettings.Run
 
    With SlideShowWindows(1).View
        'The following is said on the first slide:
        XL.Speech.Speak "Welcome to my presentation."
        'Change to slide 2, and then say the following two sentences:
        .Next
        XL.Speech.Speak "This is an example of how to create an Excel Application object."
        XL.Speech.Speak "We can use Excel's object model to invoke Text to Speech."
        
        'Close the Excel object and set the object to nothing.
        XL.Quit
        Set XL = Nothing
        
        'Exit the slideshow.
        .Exit
    End With
    
End Sub
ΣΗΜΕΙΩΣΗ: Το PowerPoint ασφαλείας έχει οριστεί σεΥψηλό (High)Από προεπιλογή, το στοιχείο. Οι μη υπογεγραμμένες μακροεντολές της Visual Basic δεν εκτελούνται σε αυτήν τη ρύθμιση. Αλλάξτε το επίπεδο ασφαλείας μακροεντολώνΜεσαίο (Medium)ακολουθώντας τα εξής βήματα:
  1. Στο διακομιστήΕργαλείαμενού, σημείοMacro, και στη συνέχεια κάντε κλικ στο κουμπίSecurity.
  2. Στο διακομιστήΕπίπεδο ασφαλείαςκαρτέλα, κάντε κλικ για να επιλέξετεΜεσαίο (Medium), και στη συνέχεια κάντε κλικ στο κουμπίOk.
  3. Στο διακομιστήFILEμενού, κάντε κλικ στο κουμπίΈξοδος (Exit)Για να κλείσετε το PowerPoint.

    ΣΗΜΕΙΩΣΗ: Πρέπει να κλείσετε και ξεκινήστε πάλι το PowerPoint για την αλλαγή του επιπέδου ασφαλείας για να τεθούν σε ισχύ.

Χρήση της ανάγνωσης κειμένου στο Word

Το ακόλουθο παράδειγμα χρησιμοποιεί το μοντέλο αντικειμένου του Excel για πρόσβαση ανάγνωσης κειμένου από ένα έγγραφο του Word. Αυτή η διαδικασία δείχνει πώς μπορείτε να αναφέρετε και να δημιουργήσετε μιαExcelΓια να χρησιμοποιήσετε το αντικείμενο τουΟμιλίαObject.

Εισαγάγετε μια λειτουργική μονάδα στο Word

  1. Ανοίξτε ένα έγγραφο του Word.
  2. Πατήστε το συνδυασμό πλήκτρων ALT+F11, για να ξεκινήσει η Επεξεργασία της Visual Basic (Visual Basic Editor).
  3. Στο διακομιστήINSERTμενού, κάντε κλικ στο κουμπίModule.
  4. Πληκτρολογήστε ή αντιγράψτε και επικολλήστε το δείγμα κώδικα που θα εμφανιστεί αργότερα σε αυτήν την ενότητα στη λειτουργική μονάδα.

Προσθέστε μια αναφορά σε 10 βιβλιοθήκη αντικειμένων του Excel

  1. Στην επεξεργασία της Visual Basic, τοποθετήστε το δείκτηΑναφορέςΣτο διακομιστήΕργαλείαΜενού (Menu).
  2. underΔιαθέσιμες αναφορές, επιλέξτε τοΒιβλιοθήκη αντικειμένων του Microsoft Excel 10.0πλαίσιο ελέγχου και, στη συνέχεια, κάντε κλικ στο κουμπίOk.

Δευτερεύουσα διαδικασία για την αυτοματοποίηση Excel ανάγνωσης κειμένου από το Word

Το ακόλουθο παράδειγμα προϋποθέτει ότι πληκτρολογείτε κείμενο στο Word το έγγραφο και στη συνέχεια επιλέξτε το κείμενο, πριν να εκτελέσετε τη διαδικασία.
Sub TTS()
   'Declare and create an Excel object.
      Dim XL_tts As Excel.Application
      Set XL_tts = CreateObject("Excel.Application")
      XL_tts.Speech.Speak Selection
      XL_tts.Quit
      Set XL_tts = Nothing
End Sub
ΣΗΜΕΙΩΣΗ: Το Word ασφαλείας έχει οριστεί σεΥψηλό (High)Από προεπιλογή, το στοιχείο. Οι μη υπογεγραμμένες μακροεντολές της Visual Basic δεν εκτελούνται σε αυτήν τη ρύθμιση. Αλλάξτε το επίπεδο ασφαλείας μακροεντολώνΜεσαίο (Medium)ακολουθώντας τα εξής βήματα:
  1. Στο διακομιστήΕργαλείαμενού, σημείοMacro, και στη συνέχεια κάντε κλικ στο κουμπίSecurity.
  2. Στο διακομιστήΕπίπεδο ασφαλείαςκαρτέλα, κάντε κλικ για να επιλέξετεΜεσαίο (Medium), και στη συνέχεια κάντε κλικ στο κουμπίOk.
  3. Στο διακομιστήFILEμενού, κάντε κλικ στο κουμπίΈξοδος (Exit)Για να κλείσετε το Word.
ΣΗΜΕΙΩΣΗ: Πρέπει να κλείσετε και κάντε επανεκκίνηση του Word για την αλλαγή του επιπέδου ασφαλείας για να τεθούν σε ισχύ.

Αναφορές

Για πρόσθετες πληροφορίες, κάντε κλικ στον αριθμό του άρθρου παρακάτω, για να προβάλετε το άρθρο της Γνωσιακής Βάσης της Microsoft (Knowledge Base):
277808
(http://support.microsoft.com/kb/277808/EN-US/ )
XL2002: "Run-time Σφάλμα 1004" όταν προσπαθείτε να χρησιμοποιήσετε το κείμενο σε ομιλία στη μακροεντολή
Για πρόσθετες πληροφορίες σχετικά με τη λήψη Βοήθειας με χρήση της Visual Basic for Applications, κάντε κλικ στον αριθμό του άρθρου παρακάτω για να προβάλετε το άρθρο της Γνωσιακής Βάσης της Microsoft:
163435
(http://support.microsoft.com/kb/163435/ )
Πόροι προγραμματισμού για τη Visual Basic for Applications
Επιστροφή στην αρχή | Αποστολή σχολίων

Ιδιότητες

Αναγν. άρθρου: 287120 - Τελευταία αναθεώρηση: Τρίτη, 28 Σεπτεμβρίου 2010 - Αναθεώρηση: 2.0
Οι πληροφορίες σε αυτό το άρθρο ισχύουν για:
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Outlook 2002 Standard Edition
  • Microsoft PowerPoint 2002 Standard Edition
  • Microsoft Word 2002
Λέξεις-κλειδιά: 
kbautomation kbenablesight kbhowtomaster kbmt KB287120 KbMtel
Μηχανικά μεταφρασμένο
ΣΗΜΑΝΤΙΚΟ: Αυτό το άρθρο είναι προϊόν λογισμικού μηχανικής μετάφρασης της Microsoft και όχι ανθρώπινης μετάφρασης. Η Microsoft σάς προσφέρει άρθρα που είναι προϊόντα ανθρώπινης αλλά και μηχανικής μετάφρασης έτσι ώστε να έχετε πρόσβαση σε όλα τα άρθρα της Γνωσιακής Βάσης μας στη δική σας γλώσσα. Ωστόσο, ένα άρθρο που έχει προκύψει από μηχανική μετάφραση δεν είναι πάντα άριστης ποιότητας. Ενδέχεται να περιέχει λεξιλογικά, συντακτικά ή γραμματικά λάθη, όπως ακριβώς τα λάθη που θα έκανε ένας μη φυσικός ομιλητής επιχειρώντας να μιλήσει τη γλώσσα σας. Η Microsoft δεν φέρει καμία ευθύνη για τυχόν ανακρίβειες, σφάλματα ή ζημίες που προκύψουν λόγω τυχόν παρερμηνειών στη μετάφραση του περιεχομένου ή χρήσης του από τους πελάτες της. Επίσης, η Microsoft πραγματοποιεί συχνά ενημερώσεις στο λογισμικό μηχανικής μετάφρασης.
Η αγγλική έκδοση αυτού του άρθρου είναι η ακόλουθη:287120
(http://support.microsoft.com/kb/287120/en-us/ )
Επιστροφή στην αρχή | Αποστολή σχολίων

Αποστολή σχολίων

 
Επιστροφή στην αρχήΕπιστροφή στην αρχή