1 Ανοίξτε το έγγραφο που επεξεργάζεστε στο Microsoft Word . 2
Πατήστε το πλήκτρο " Alt " και " F11 " για να μεταπηδήσετε σε Visual Basic από το Word .
Η 3
Ανάπτυξη "Normal " στο "Πρόγραμμα - Normal" παράθυρο εργασιών , αναπτύξτε " Modules " και κάντε διπλό κλικ στο " NewMacros . "
Η
4 Μετακινηθείτε προς τα κάτω για να η τελευταία " End Sub " εάν υπάρχει ένα υπάρχον στη σελίδα σας , και πατήστε το πλήκτρο " Enter".
5
Copy ( " CTRL " και "C" ) και επικόλληση ( " CTRL " και " V » ), ο κώδικας που ακολουθεί , παρέχεται από τη Microsoft , για να επισημάνετε τις παραγράφους του κειμένου σε μια σελίδα :
Sub SelectRange ( )
Dim rngParagraphs Όπως Σειρά
Set rngParagraphs = ActiveDocument . Range ( _
Έναρξη : = ActiveDocument.Paragraphs ( 1 ) Range.Start , _
End : . . = ActiveDocument.Paragraphs ( 4 ) Range.End )
rngParagraphs.Select
End Sub
Η 6
Αντικαταστήστε το " SelectRange ( ) " με το όνομα που θέλετε να δώσετε τη μακροεντολή .
Η 7
Αντικατάσταση "Start : = ActiveDocument.Paragraphs ( 1 ) " με την παράγραφο που θέλετε να αρχίσετε την επιλογή μέσα Για παράδειγμα , για να ξεκινήσει τονίζοντας στην τρίτη παράγραφο , χρησιμοποιήστε " Έναρξη : = ActiveDocument.Paragraphs ( 3 ) "αντί
8
Αντικαταστήστε το " End : = " ActiveDocument.Paragraphs ( 4 ) " με την παράγραφο όπου τα άκρα τονίζοντας
Η 9
Κλείσιμο Visual Basic για να επιστρέψετε στο Word
Η . . 10
Πιέστε το πλήκτρο " Alt " και " F8 " για να ανοίξετε το παράθυρο διαλόγου " Μακροεντολές " . Επιλέξτε τη μακροεντολή που δημιουργήθηκε σε Visual Basic από τον κατάλογο της μακροοικονομικής όνομα και πατήστε " Εκτέλεση".
Η
Η
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα