Έτσι δημιουργείτε βιβλία εργασίας με τον τρόπο που θέλετε
Θα θέλατε να διασφαλίσετε ότι θα δημιουργήσετε μια ολόκληρη σειρά κενών φύλλων εργασίας στον πίνακά σας και θα τα μετονομάσετε όλα σύμφωνα με τις επιθυμίες σας;
Χρειάζεται πολύς χρόνος αν το κάνετε χειροκίνητα. Η χειροκίνητη μετονομασία των πινάκων είναι ιδιαίτερα χρονοβόρα.
Είναι πιο εύκολο με μια μακροεντολή. Εισαγάγετε τα ονόματα των πινάκων σε μια περιοχή ενός πίνακα. Η παρακάτω εικόνα δείχνει πώς μπορεί να μοιάζει:
Στη συνέχεια, καλέστε την ακόλουθη μακροεντολή για να δημιουργήσετε τους πίνακες:
Sub FuegeBlaetterMithNamenEin ()
Dim area As String
Dim Cell As Range
Dim πίνακας ως φύλλο εργασίας
Περιοχή = "a1: a24"
Με το ActiveWorkbook
Για κάθε κελί στο ActiveSheet.Range .Cells
Ορισμός πίνακα = .Sheets.Add (Μετά: =. Sheets (Sheets.Count))
Πίνακας. Όνομα = Κελί. Κείμενο
Επόμενο κελί
Τέλος με
Τέλος υπο
Βάλτε με τη μεταβλητή περιοχή καθορίζει από ποια περιοχή του πίνακά σας έχουν ληφθεί τα ονόματα για τα φύλλα εργασίας.
Το παρακάτω σχήμα δείχνει ένα βιβλίο εργασίας στο οποίο δημιουργήθηκαν τα ονόματα των πινάκων για τους μήνες 2010 και 2011:
Συμβουλή: Αν θέλετε να μάθετε πώς να εισάγετε και να ξεκινάτε μακροεντολές στο Excel, θα βρείτε μια σύντομη περιγραφή εδώ: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
