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