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

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

1 Ανοίξτε το Excel στον υπολογιστή σας . Κάντε κλικ στο "Προβολή " καρτέλα στην κορδέλα και , στη συνέχεια, κάντε κλικ στο εικονίδιο " Μακροεντολές " . 2

Πληκτρολογήστε ένα περιγραφικό όνομα για τη νέα μακρο . Μην χρησιμοποιείτε κενά στο όνομα της μακροεντολής . Δημιουργήστε ένα δείγμα μακροεντολής για να χρησιμοποιήσετε κατά τη διαδικασία της μάθησης για να γράψετε μια μακροεντολή στη VBA . Ως εκ τούτου , εισάγετε τις μακρο ονομασία " Change_Worksheet_Names " στο μακροοικονομικό πεδίο Όνομα και , στη συνέχεια, κάντε κλικ στο κουμπί "Δημιουργία ". Η Microsoft Visual Basic for Application παράθυρο ανοίγει και εμφανίζει ένα " Module ( Code ) " παράθυρο με τα τυφλά " Sub Change_Worksheet_Names ( ) " έγγραφο κώδικα .
Εικόνων 3

Συνεχίστε δημιουργώντας το δείγμα μακροεντολής , η οποία αλλάζει όλα το γενικό " Φύλλο1 ", " Sheet2 " φύλλα εργασίας σε ένα βιβλίο εργασίας σε μια τιμή από μια κεφαλίδα ή ένα κύτταρο του τίτλου σε κάθε φύλλο εργασίας . Για παράδειγμα , αν εισάγετε τον τίτλο για κάθε φύλλο στο κελί " A1 " από κάθε φύλλο εργασίας , αυτή η μακροεντολή αλλάζει το όνομα που εμφανίζεται στο κάτω μέρος του κάθε φύλλου εργασίας για την τιμή του αναφερόμενου κελιού - σε αυτή την περίπτωση " A1 ". Για να δημιουργήσετε τη μακροεντολή χρησιμοποιώντας VBA , πληκτρολογήστε τον ακόλουθο κώδικα μεταξύ των " Sub Change_Worksheet_Names ( ) " και " End Sub " tags :

Dim myWorksheet Όπως Φύλλο

For Each myWorksheet Σε Φύλλα

« Η επόμενη γραμμή κώδικα επιβεβαιώνει ότι το κελί A1 σε κάθε φύλλο εργασίας δεν είναι κενή . Αυτό το κείμενο είναι ένας κώδικας " παρατήρηση ". Το μονό απόσπασμα στην αρχή της γραμμής ενημερώνει το Excel να μην συμπεριλάβει αυτό το κείμενο στον κώδικα μακροεντολών . Παρατηρήσεις είναι ένας καλός τρόπος για να αφήσει τις σημειώσεις σε κώδικα VBA που εξηγούν εντολές ή σύνταξη που χρησιμοποιείται .

Εάν myWorksheet.Range ( "A1" ) . Value <> " " Τότε

Αυτό ' η εντολή μετονομάζει το φύλλο εργασίας με την τιμή κειμένου στο κελί " A1 " του πρώτου φύλλου εργασίας .

myWorksheet.Name = myWorksheet.Range ( " A1" ) . value

End If

'Το "Next" εντολή καθοδηγεί το Excel για να επαναλάβετε τα παραπάνω κώδικα εντολές μέχρι να τελειώσετε με τη μετονομασία όλα τα φύλλα εργασίας στο ενεργό βιβλίο εργασίας .

Next
Η

4 Κάντε κλικ στο " Αποθήκευση "εικονίδιο κάτω από τη γραμμή μενού στο παράθυρο επεξεργαστή VBA . Πληκτρολογήστε ένα όνομα για το πρότυπο του Excel που περιέχει τον κώδικα μακροεντολής . Επιλέξτε " Excel Macro - Enabled βιβλίου εργασίας ", όπως τον τύπο αρχείου και στη συνέχεια κάντε κλικ στο κουμπί "Αποθήκευση". Κλείστε το παράθυρο επεξεργασίας VBA .
5

Δοκιμάστε το macro για δείγμα κώδικα VBA . Εισάγετε μια κεφαλίδα ή φύλλο όνομα τίτλου στο κελί A1 του κάθε φύλλο εργασίας. Για παράδειγμα , πληκτρολογήστε "Daily , " Weekly " και " Μηνιαία "στο κελί A1 του τρία φύλλα εργασίας . Οι καρτέλες για κάθε φύλλο εργασίας στο κάτω μέρος του παραθύρου του Excel θα πρέπει να διαβάσουν " Φύλλο1 "," Sheet2 "και" Sheet3 ", αντίστοιχα .

6

Κάντε κλικ στο " Macro " στην καρτέλα "Προβολή" . Τονίστε τα " Change_Worksheet_Names " μακρο-και στη συνέχεια κάντε κλικ στο κουμπί "Run . " τα ονόματα καρτέλα του φύλλου εργασίας στο κάτω μέρος της αλλαγής παράθυρο για " Καθημερινή ", " Weekly "και" Monthly ».
Η
εικόνων