Πώς να αντιγράψετε αρχεία Excel χρησιμοποιώντας μια μακροεντολή
Θα θέλατε να αντιγράψετε ένα βιβλίο εργασίας του Excel και να του δώσετε ένα νέο όνομα; Φυσικά, μπορείτε να το κάνετε αυτό μέσω των Windows, αλλά πώς μπορείτε να το αυτοματοποιήσετε στο Excel; Μια πιθανότητα είναι να ανοίξετε το κατάλληλο βιβλίο εργασίας και στη συνέχεια να το αποθηκεύσετε με νέο όνομα.
Ωστόσο, αυτό απαιτεί πολύ χρόνο και είναι δυσκίνητο επειδή το Excel πραγματοποιεί υπολογισμούς, ενημερώνει συνδέσμους και άλλα παρόμοια όταν ανοίγει το βιβλίο εργασίας. Είναι ευκολότερο να το κάνετε απευθείας χρησιμοποιώντας την εντολή VBA FileCopy. Η ακόλουθη μακροεντολή αντιγράφει ένα βιβλίο εργασίας από τον έναν κατάλογο στον άλλο, καθορίζοντας ένα νέο όνομα:
Αντιγραφή δευτέρου βιβλίου εργασίας ()
Απώλεια πηγή ως συμβολοσειρά, προορισμός ως συμβολοσειρά
Πηγή = "c: \ August.xls"
Προορισμός = "c: \ data \ September.xls"
Πηγή FileCopy, προορισμός
Τέλος υπο
Βάλτε τη μεταβλητή πηγή Καθορίστε το όνομα και τη διαδρομή του αρχείου που θέλετε να αντιγράψετε. Αποθήκευση στη μεταβλητή στόχος τη διαδρομή και τον προορισμό του αρχείου. Στο δείγμα προγράμματος, το αρχείο August.xls από τη διαδρομή C: \ αποθηκεύεται με το νέο όνομα September.xls στη διαδρομή C: \ Daten. Το αρχείο προέλευσης August.xls παραμένει αμετάβλητο.
Με την εντολή μπορείτε όχι μόνο να αντιγράψετε βιβλία εργασίας του Excel, αλλά και άλλα αρχεία.
