Πώς να χρησιμοποιήσετε τις μακροεντολές για να δημιουργήσετε βιβλία εργασίας του Excel - ανδρείκελα

Μπορεί μερικές φορές να θέλετε ή να χρειαστεί να δημιουργήσετε ένα βιβλίο εργασίας του Excel με αυτοματοποιημένο τρόπο. Για παράδειγμα, ίσως χρειαστεί να αντιγράψετε δεδομένα από έναν πίνακα και να τα επικολλήσετε σε ένα βιβλίο εργασίας που δημιουργήθηκε πρόσφατα. Η ακόλουθη μακροεντολή αντιγράφει μια σειρά κελιών από το ενεργό φύλλο και επικολλά τα δεδομένα σε ένα νέο βιβλίο εργασίας.

Πώς λειτουργεί η μακροεντολή

Όπως θα δείτε όταν διαβάζετε τις γραμμές του κώδικα, αυτή η μακροεντολή είναι σχετικά διαισθητική:

Sub Macro1 () 'Βήμα 1 Αντιγράψτε τα φύλλα δεδομένων ("Παράδειγμα 1"). Εύρος ("B4: C15"). Αντιγράψτε 'Βήμα 2 Δημιουργήστε ένα νέο βιβλίο εργασίας βιβλίων εργασίας. Προσθήκη 'Βήμα 3 Επικόλληση δεδομένων ActiveSheet. Επικόλληση προορισμού: = Περιοχή ("A1") 'Βήμα 4 Απενεργοποίηση ειδοποιήσεων εφαρμογών Εφαρμογή. DisplayAlerts = False 'Βήμα 5 Αποθηκεύστε το βιβλίο εργασίας ActiveWorkbook που δημιουργήθηκε πρόσφατα. SaveAs _ Όνομα αρχείου: = "C: TempMyNewBook. Xlsx" 'Βήμα 6 Γυρίστε τις ειδοποιήσεις εφαρμογής πίσω στην εφαρμογή. DisplayAlerts = True End Sub

Στο Βήμα 1, απλά αντιγράφετε τα δεδομένα που κυμαίνονται από τα κελιά B4 έως C15. Σημειώστε ότι καθορίζετε τόσο το φύλλο όσο και το εύρος ονομασίας. Αυτή η προσέγγιση είναι μια βέλτιστη πρακτική όταν εργάζεστε με πολλά ανοιχτά βιβλία εργασίας.

Στο Βήμα 2, χρησιμοποιείτε τη μέθοδο Προσθήκη του αντικειμένου του βιβλίου εργασίας για να δημιουργήσετε ένα βιβλίο εργασίας. Το κενό βιβλίο εργασίας είναι ισοδύναμο με το χέρι επιλέγοντας Αρχείο → Νέο → Κενό έγγραφο στην κορδέλα Excel.

Στο Βήμα 3, χρησιμοποιείτε τη μέθοδο Επικόλληση για να στείλετε τα αντιγραμμένα δεδομένα στο κελί A1 του νέου βιβλίου εργασίας.

Δώστε προσοχή στο γεγονός ότι ο κώδικας αναφέρεται στο αντικείμενο ActiveSheet. Όταν προσθέτετε ένα βιβλίο εργασίας, το νέο βιβλίο εργασίας κερδίζει αμέσως την εστίαση, καθιστώντας το ενεργό βιβλίο εργασίας. (Το Excel κάνει το ίδιο όταν προσθέτετε ένα βιβλίο εργασίας χειροκίνητα.)

Στο Βήμα 4 του κώδικα, ρυθμίζετε τη μέθοδο DisplayAlerts σε False, απενεργοποιώντας αποτελεσματικά τις προειδοποιήσεις του Excel. Αυτό το κάνετε επειδή στο επόμενο βήμα του κώδικα αποθηκεύετε το βιβλίο εργασίας που δημιουργήθηκε πρόσφατα. Μπορείτε να εκτελέσετε αυτήν τη μακροεντολή πολλές φορές, οπότε το Excel προσπαθεί να αποθηκεύσει το αρχείο πολλές φορές.

Τι συμβαίνει όταν προσπαθείτε να αποθηκεύσετε ένα βιβλίο εργασίας πολλές φορές; Αυτό είναι σωστό - το Excel σας προειδοποιεί ότι υπάρχει ήδη ένα αρχείο με αυτό το όνομα και στη συνέχεια σας ρωτάει αν θέλετε να αντικαταστήσετε το προηγούμενο αρχείο. Επειδή ο στόχος σας είναι να αυτοματοποιήσετε τη δημιουργία του βιβλίου εργασίας, θέλετε να καταργήσετε αυτήν την προειδοποίηση.

Στο βήμα 5, αποθηκεύετε το αρχείο χρησιμοποιώντας τη μέθοδο SaveAs. Σημειώστε ότι εισάγετε την πλήρη διαδρομή της τοποθεσίας αποθήκευσης, συμπεριλαμβανομένου του τελικού ονόματος αρχείου.

Επειδή απενεργοποιήσατε την εφαρμογή τροποποιείτε στο Βήμα 4, θα πρέπει να τις ενεργοποιήσετε ξανά (βλ. Βήμα 6). Εάν δεν το κάνετε, το Excel εξακολουθεί να καταστέλλει όλες τις προειδοποιήσεις κατά τη διάρκεια της τρέχουσας συνεδρίας.

Για να χρησιμοποιήσετε τη μακροεντολή

Για να εφαρμόσετε αυτήν τη μακροεντολή, μπορείτε να την αντιγράψετε και να την επικολλήσετε σε μια τυποποιημένη ενότητα:

1. Ενεργοποιήστε τον επεξεργαστή της Visual Basic πατώντας Alt + F11.

2. Κάντε δεξί κλικ στο όνομα του έργου / βιβλίου εργασίας στο παράθυρο του έργου.

3. Επιλέξτε Εισαγωγή → Ενότητα.

4. Πληκτρολογήστε ή επικολλήστε τον κώδικα στη νεοδημιουργηθείσα ενότητα.

   Ίσως χρειαστεί να αλλάξετε το όνομα του φύλλου, τη διεύθυνση εμβέλειας και την τοποθεσία αποθήκευσης.