Πώς να γράψετε μακροεντολές σε Visual Basic

Πόσο χρόνο μπορείτε να αφιερώσουν στην εκμάθηση αυτού του τύπου κώδικα υπολογιστή : " Selection.Sort Key1 : = Range ( " A5 " ) , Παραγγελία1 : = xlAscending ; " Μπορεί να νιώθετε ότι η ζωή είναι πολύ σύντομη για να ξοδεύουν τόσο πολύ χρόνο για να κάνει μια απλή εργασία . Ευτυχώς , Visual Basic προσφέρει έναν ευκολότερο τρόπο . Για πολλές εργασίες , μπορείτε απλά να δημιουργήσετε μια μακροεντολή , η οποία είναι μια αυτοματοποιημένη διαδικασία που δημιουργήθηκε από μια χειροκίνητη διαδικασία . Οι μακροεντολές είναι χρήσιμο, επειδή μπορείτε απλά να πατήσετε ένα κουμπί και να καταγράφει τα βήματα που χρειάζονται για να ολοκληρωθεί το έργο στο υπολογιστικό φύλλο . Η Visual Basic διερμηνέα δημιουργεί αυτόματα τον κώδικα . Ο υπολογιστής φροντίζει απόκρυφες σύνταξη , έτσι ώστε να μην χρειάζεται να ανησυχείτε γι 'αυτό . Κάθε φορά που θέλετε να εκτελέσετε τη διαδικασία , μπορείτε απλά να εκτελέσετε τη μακροεντολή . Οδηγίες
Η 1

Δημιουργία κάποια στοιχεία για ένα "είδος " macro . Εισάγετε τον παρακάτω δεδομένων σε κελιά A1 έως A5 : . " Mancini , " " Talbot , " " Simons ", " Chen " και " Ito " 2

Ξεκινήστε την καταγραφή της μακροεντολής , επιλέγοντας "Εργαλεία" και « Macro ». Στη συνέχεια, επιλέξτε "Record New Macro " και πατήστε " OK".
Εικόνων 3

Μετακινήστε τον κέρσορα στο κελί A1 πατώντας το πλήκτρο " Ctrl " + "Home ". Επιλέξτε τη στήλη των ονομάτων κρατώντας πατημένο το πλήκτρο "Shift" και πατώντας το πλήκτρο " Ctrl " με το κάτω βέλος . Πατήστε το " Αύξουσα ταξινόμηση " κλειδί ( το κουμπί στο πάνω μέρος του μενού με την ένδειξη " AZ" με ένα βέλος προς τα κάτω ) . Σταματήστε την καταγραφή της μακροεντολής πιέζοντας το μπλε τετράγωνο στο παράθυρο "Stop Rec" .
Η 4

Επανεξέταση υπολογιστή που δημιουργείται κωδικό σας, κρατώντας " Alt " και πατώντας το πλήκτρο " F8 ". Στη συνέχεια , επιλέξτε το όνομα της μακροεντολής σας , η οποία θα πρέπει να είναι " Macro1 " αν ο υπολογιστής που έχει επιλεγεί το όνομα αυτόματα . Πατήστε " Επεξεργασία". Επιβεβαιώστε ότι ο υπολογιστής που δημιουργείται τον ακόλουθο κώδικα : Sub

Macro1 ( ) '' Macro1 Macro « Macro καταγραφεί από 04/29/2010 w '

» Range ( "A1 : A6 " ) . SelectSelection.Sort Key1 : = Range ( "A1 " ) , Παραγγελία1 : = xlAscending , Header : = xlGuess , _OrderCustom : = 1 , MatchCase : = False , Orientation : = xlTopToBottomActiveWindow.SmallScroll Down : = 69End Sub
Η
εικόνων