Πίνακας περιεχομένων:
Βίντεο: Εφαρμόστε την παρακάτω ταξινόμηση στην περιοχή κελιών A3:C14. Πρώτα ως προς την στήλη Πολλαπλών... 2025
Ένας από τους πιο απλούς αυτοματισμούς που σχετίζονται με το φύλλο εργασίας μπορεί να εφαρμόσει με μια μακροεντολή στο Excel προσθέτει και ονομάζει ένα νέο φύλλο εργασίας. Δείτε πώς λειτουργεί αυτή η μακροεντολή και πώς να τη χρησιμοποιήσετε.
Πώς λειτουργεί η μακροεντολή
Όταν διαβάζετε τις γραμμές του κώδικα, θα δείτε ότι αυτή η μακροεντολή είναι σχετικά διαισθητική:
Sub Macro1 () 'Βήμα 1: Σφάλμα GoTo MyError 'Βήμα 2: Προσθέστε ένα φύλλο και ονομάστε τα φύλλα. Προσθέστε το ActiveSheet. Όνομα = _ Φύλλο εργασίας. Text (Now (), "m-d-yyyy h_mm_ssam / pm") Exit Sub 'Βήμα 3: Εάν συνέβη εδώ, πείτε στο χρήστη MyError: MsgBox "Υπάρχει ήδη ένα φύλλο που ονομάζεται". " End Sub
Πρέπει να προβλέψετε ότι εάν δώσετε στο νέο φύλλο ένα όνομα που υπάρχει ήδη, θα εμφανιστεί ένα σφάλμα. Έτσι στο βήμα 1, η μακροεντολή λέει στο Excel να μεταβεί αμέσως στη γραμμή που λέει MyError (στο βήμα 3) εάν υπάρχει σφάλμα.
Το βήμα 2 χρησιμοποιεί τη μέθοδο Προσθήκη για να προσθέσετε ένα νέο φύλλο. Από προεπιλογή, το φύλλο ονομάζεται φύλλο xx, όπου xx αντιπροσωπεύει τον αριθμό του φύλλου. Δίνετε το νέο όνομα στο φύλλο αλλάζοντας την ιδιότητα Όνομα του αντικειμένου ActiveSheet. Σε αυτήν την περίπτωση, ονομάζετε το φύλλο εργασίας με την τρέχουσα ημερομηνία και ώρα.
Όπως και με τα βιβλία εργασίας, κάθε φορά που χρησιμοποιείτε το VBA για να προσθέσετε ένα νέο φύλλο, το νέο φύλλο που προστέθηκε αυτόματα γίνεται ενεργό φύλλο. Τέλος, στο Βήμα 2, σημειώστε ότι η μακροεντολή εξέρχεται από τη διαδικασία. Πρέπει να το κάνει αυτό έτσι ώστε να μην πάει τυχαία στο Βήμα 3 (το οποίο μπαίνει στο παιχνίδι μόνο αν παρουσιαστεί σφάλμα).
Το βήμα 3 ειδοποιεί το χρήστη ότι το όνομα του φύλλου υπάρχει ήδη. Και πάλι, αυτό το βήμα θα πρέπει να ενεργοποιηθεί μόνο αν παρουσιαστεί σφάλμα.
Για να χρησιμοποιήσετε τη μακροεντολή
Για να εφαρμόσετε αυτήν τη μακροεντολή, μπορείτε να την αντιγράψετε και να την επικολλήσετε σε μια τυπική ενότητα:
-
Ενεργοποιήστε τον επεξεργαστή της Visual Basic πατώντας Alt + F11.
-
Κάντε δεξί κλικ στο όνομα του έργου / βιβλίου εργασίας στο παράθυρο του έργου.
-
Επιλέξτε Εισαγωγή → Ενότητα.
-
Πληκτρολογήστε ή επικολλήστε τον κώδικα στη νεοδημιουργηθείσα ενότητα.