Χρησιμοποιήστε μια μακροεντολή VBA για να δημιουργήσετε ένα νέο βιβλίο εργασίας που περιέχει ακριβώς όσα φύλλα εργασίας χρειάζεστε
Σε πολλές μακροεντολές, πρέπει να δημιουργηθούν νέα βιβλία εργασίας τα οποία, για παράδειγμα, είναι γεμάτα με συγκεκριμένο περιεχόμενο. Μια σημαντική εργασία εδώ είναι να δημιουργήσετε ένα νέο βιβλίο εργασίας του Excel που περιέχει ακριβώς τον αριθμό των υπολογιστικών φύλλων που θέλετε.
Η παρακάτω μακροεντολή κάνει αυτή τη δουλειά. Δημιουργεί ένα νέο βιβλίο εργασίας που περιέχει 31 φύλλα εργασίας. Αυτά τα φύλλα εργασίας αριθμούνται από 1 έως 31. Ακολουθούν οι κατάλληλες εντολές VBA:
Sub FuegeTabellenEin ()
Dim αριθμός ως ακέραιος
Dim i As Integer
Dim Mappe As Workbook
Αριθμός = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 31
Ορισμός φακέλου = Τετράδια εργασίας. Προσθήκη
Για i = 1 To Mappe.Worksheets.Count
Φάκελος. Φύλλα εργασίας (i). Όνομα = i
Επόμενο i
Application.SheetsInNewWorkbook = αριθμός
Τέλος υπο
Όταν ξεκινά, το Excel εμφανίζει ένα νέο βιβλίο εργασίας που περιέχει 31 φύλλα εργασίας. Το παρακάτω σχήμα δείχνει πώς φαίνεται στο μητρώο φύλλων:
Στη μακροεντολή, καθορίζετε τον αριθμό των φύλλων εργασίας που θέλετε χρησιμοποιώντας τον αριθμό 31. Αλλάξτε αυτόν τον αριθμό εάν θέλετε να έχετε λιγότερα ή περισσότερα φύλλα εργασίας σε ένα βιβλίο εργασίας.
Για να εισαγάγετε τη μακροεντολή, πατήστε ALT F11 στο Excel για να εμφανιστεί ο επεξεργαστής VBA. Χρησιμοποιήστε την εντολή INSERT - MODULE για να εισαγάγετε ένα κενό φύλλο λειτουργικής μονάδας. Για να ξεκινήσετε τη μακροεντολή απευθείας από το Excel, χρησιμοποιήστε τον συνδυασμό πλήκτρων ALT F8.
