Προσθήκη διεύθυνσης διαδρομής στην κεφαλίδα/υποσέλιδο

Anonim

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

Για να προσθέσετε τη διαδρομή σε μια κεφαλίδα ή υποσέλιδο:

1. Ανοίξτε το VBE (Visual Basic Editor) πατώντας Alt+F11.
2. Στο Project Explorer, κάντε διπλό κλικ στην ενότητα ThisWorkbook.
3. Από την αναπτυσσόμενη λίστα Αντικείμενο, επιλέξτε Βιβλίο εργασίας και από την αναπτυσσόμενη λίστα Διαδικασία, επιλέξτε BeforePrint (αυτές οι δύο αναπτυσσόμενες λίστες βρίσκονται στην κορυφή του φύλλου Ενότητα).
4. Στη διαδικασία συμβάντος, μεταξύ των δηλώσεων ανοίγματος και κλεισίματος που δημιουργούνται αυτόματα, πληκτρολογήστε τον ακόλουθο κώδικα:

ActiveSheet.PageSetup.LeftFooter = "& A & F & T & D" & ActiveWorkbook.Path

Τα γράμματα A, F, T, D είναι το όνομα του φύλλου, το όνομα του βιβλίου εργασίας, η ώρα και η ημερομηνία, αντίστοιχα.
Όταν χρησιμοποιείτε Excel 2002 και Excel 2003, η γραμμή κώδικα θα είναι μικρότερη (το Z είναι για τη διεύθυνση διαδρομής):
LeftFooter = "& A & F & T & D & Z"
Στιγμιότυπο οθόνης // Προσθήκη διεύθυνσης διαδρομής στην κεφαλίδα/υποσέλιδο