VBA Tutorial για το Word

Visual Basic for Applications ( VBA ) είναι μια γλώσσα προγραμματισμού που χρησιμοποιείται για την αυτοματοποίηση εργασιών στο Microsoft Word . Με Visual Basic μπορείτε να κάνετε οποιαδήποτε εργασία που μπορείτε να κάνετε στο Word χωρίς Visual Basic , αλλά πιο γρήγορα . Αυτό είναι ιδιαίτερα αληθές των πράξεων που περιλαμβάνουν πολλές δευτερεύουσες εργασίες , όπως μια αναζήτηση για μια λέξη , που ακολουθείται από την επιλογή λέξης , που ακολουθείται από formatting.The ακόλουθο δείγμα κώδικα δείχνει πώς μπορείτε να αρχίσετε να χρησιμοποιείτε VBA να δώσει πρακτικές λύσεις για τα θέματα επεξεργασίας κοινή λέξη . Εισάγετε το παράδειγμα κώδικα στο IDE
Η

Ανοίξτε MS Word και να πάει στην Visual Basic IDE ( ολοκληρωμένο περιβάλλον ανάπτυξης ) πατώντας alt - F11 .

Στο παράθυρο κώδικα , πληκτρολογήστε τον ακόλουθο κώδικα του προγράμματος .

Public Sub mac ( ) Dim r Όπως RangeDim w Όπως RangeDim i Όπως IntegerDim t As String

Options.DefaultHighlightColorIndex

Set r = Selection.Range

r.StartOf ( wdParagraph )

r.Expand = TrueWith r.Find.Text = " είναι " . Replacement.Text = " είναι " . Forward = True.Wrap = wdFindStop.Format = True.MatchCase = False.MatchWholeWord = True.MatchWildcards = False.MatchSoundsLike = False.MatchAllWordForms = FalseEnd Withr.Find.Execute Αντικατάσταση : = wdReplaceAll

End Sub

Μπορείτε να πάρετε μια αίσθηση του τι αυτό το πρόγραμμα θα κάνει παρατηρώντας τις συγκεκριμένες λέξεις-κλειδιά στο πλαίσιο αυτό : την παράγραφο , εύρεση και επιλογή , για παράδειγμα. Το πρόγραμμα βρίσκει και αναδεικνύει όλες τις εμφανίσεις μιας λέξης που έχετε ορίσει , κατά την τρέχουσα παράγραφο

Παρατηρήστε τις δύο αυτές γραμμές στον κώδικα : . . . Text = " είναι " Replacement.Text = " είναι "

Οι γραμμές πει λέξη τι να αναζητήσουν . Στη θέση αυτών που " είναι " s , εισάγετε ό, τι λέξη ή το κείμενο που θέλετε να αναζητήσετε και να τονιστούν.
Εικόνων λειτουργία του Προγράμματος
Η

Επιστροφή στη λέξη ( alt - F11 ) και εισαγάγετε μερικά σημεία που αξίζει κειμένου. Αυτές οι σκέψεις θα πρέπει να περιέχει τουλάχιστον μερικά περιστατικά της προαναφερθείσας όρο αναζήτησης που έχετε επιλέξει .

Όταν έχετε τελειώσει την εισαγωγή του κειμένου , τοποθετήστε το δρομέα μέσα οποιαδήποτε από αυτές τις παραγράφους . Εκτελέστε το πρόγραμμα : επιλέξτε alt - F8 για να εμφανιστεί το παράθυρο μακρο - replay . Επιλέξτε το " mac " macro , και πατήστε Εκτέλεση. Εάν το Word εντοπίσει τυχόν περιπτώσεις της λέξης αναζήτησης που έχετε ορίσει , στην παράγραφο που περιέχει το δρομέα , θα τονίσει τη λέξη .

Η Καταλάβετε το να Tailor το
Η

Πληκτρολογώντας σε ένα ενιαίο σενάριο μπορεί να βελτιώσει τη ροή εργασίας σας λίγο . Αλλά αν έχετε καταλάβει πώς λειτουργεί το σενάριο , θα αρχίσει να βελτιώνεται σε μεγάλο βαθμό τη ροή εργασίας σας , και σε μια διαρκή βάση .

Επιστροφή στην Visual Basic IDE και να δούμε τον κώδικα του προγράμματος μέσα στη συνάρτηση mac . Παρατηρήστε πως η λειτουργία mac παίρνει στην τρέχουσα παράγραφο για να κάνει την αντικατάσταση της λειτουργίας του: φαίνεται στο αντικείμενο επιλογής , η οποία αντιπροσωπεύει το επιλεγμένο κείμενο ή το σημείο εισαγωγής . Στη συνέχεια , χρησιμοποιώντας εσωτερική αναπαράσταση του Word του εγγράφου , το σενάριο " leapfrogs " από το τρέχον σημείο εισαγωγής στην αρχή της παραγράφου που περιέχει το σημείο εισαγωγής .

Αυτό το είδος της κίνησης γίνεται δυνατή μέσω ενός δικτύου των συνδέσεων μέσα VBA για το Word . Η τρέχουσα επιλογή συνδέεται με την τρέχουσα λέξη , τη σημερινή πρόταση και την τρέχουσα παράγραφο . Συγκεκριμένα , συνδέσεις mac ή leapfrogs από την τρέχουσα επιλογή στην αρχή της τρέχουσας παραγράφου ( Set r = Selection.Range και r.StartOf ( wdParagraph ) ) . Σε εκείνο το σημείο , το r είναι μόνο ένα σημείο εισαγωγής , αλλά θέλουμε να αναφερθώ σε ολόκληρη την παράγραφο , έτσι ώστε να το επεκτείνει με r.Expand wdParagraph . Αν θέλετε να αναζητήσετε μόνο την τρέχουσα πρόταση αντί της τρέχουσας παραγράφου , αντικαταστήστε όλες τις εμφανίσεις του wdParagraph στον κώδικα του προγράμματος με wdSentence .
Η
εικόνων