Εμφάνιση ενός μόνο μηνύματος
  #2  
Παλιά 05-12-09, 21:59
Το avatar του χρήστη Tasos
Tasos Ο χρήστης Tasos είναι συνδεδεμένος
Διαχειριστής
Όνομα: Τάσος Φιλοξενιδης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική
 
Εγγραφή: 21-10-2009
Μηνύματα: 1.325
Προεπιλογή

Αγαπητέ μου φίλε,
Μπορείς να το κάνεις χειροκίνητα με τον τρόπο που δείχνει η εικόνα:

Κόκκινες υπογραμμίσεις σε κείμενο word-nospellmarks.png

Ένας άλλος τρόπος, είναι να τοποθετήσεις τον παρακάτω κώδικα στο Normal.dotm στον
VBE.
Κώδικας:
Option Explicit

Sub DoNotShowUnderLines()
    With ActiveDocument
        .ShowGrammaticalErrors = Not .ShowGrammaticalErrors
        .ShowSpellingErrors = Not .ShowGrammaticalErrors
    End With
End Sub
Αφού αποθηκεύσεις το Normal.dotm (μέσα από τον VBE) , πήγαινε στο μενού
"Επιλογές του Word" >" Προσαρμογή", και στην αριστερή πτυσσόμενη λίστα επίλεξε "Μακροεντολές".
Στη λίστα ακριβώς από κάτω, βρες τη μακροεντολή "DoNotShowUnderLines" , πρόσθεσε στη γραμμή εργαλείων γρήγορης πρόσβασης (δεξιά λίστα) ,
επίλεξε την πρώτα και πάτησε το κουμπί "Τροποποίηση" για να ορίσεις κάποιο σύμβολο ή να αλλάξεις το εμφανιζόμενο όνομα.
Έτσι, όποτε θελήσεις, μπορείς από τη γραμμή εργαλείων γρήγορης πρόσβασης
να εμφανίσεις/αποκρύψεις τις κόκκινες υπογραμμίσεις.

Τάσος
__________________
Ms-Office Development Team
Ανάπτυξη επαγγελματικών εφαρμογών σε VB.Net, Access, Excel, Outlook, Word
Απάντηση με παράθεση