Σημείωση: Θέλουμε να σας παρέχουμε το πιο πρόσφατο περιεχόμενο βοήθειας στη γλώσσα σας όσο πιο σύντομα γίνεται. Αυτή η σελίδα έχει μεταφραστεί μέσω αυτοματοποιημένης διαδικασίας και ενδεχομένως να περιέχει γραμματικά λάθη και ανακρίβειες. Ο σκοπός μας είναι αυτό το περιεχόμενο να σας φανεί χρήσιμο. Μπορείτε να μας ενημερώσετε στο κάτω μέρος αυτής της σελίδας εάν οι πληροφορίες σάς φάνηκαν χρήσιμες; Εδώ θα βρείτε το άρθρο στα Αγγλικά για να το συμβουλεύεστε εύκολα.
Σύνοψη
Στο Microsoft Excel, μπορείτε να δημιουργήσετε μια μακροεντολή Microsoft Visual Basic for Applications (VBA) που αποκρύπτει το μήνυμα " Αποθήκευση αλλαγών " κατά το κλείσιμο ενός βιβλίου εργασίας. Αυτό μπορεί να γίνει είτε με τον καθορισμό της κατάστασης της αποθηκευμένης ιδιότητας του βιβλίου εργασίας είτε με την απόκρυψη όλων των ειδοποιήσεων για το βιβλίο εργασίας.
Περισσότερες πληροφορίες
ΣημείωσηΗ Microsoft παρέχει παραδείγματα προγραμματισμού μόνο για επεξήγηση, χωρίς καμία εγγύηση ρητή ή σιωπηρή. Αυτό περιλαμβάνει, μεταξύ άλλων, τις σιωπηρές εγγυήσεις εμπορευσιμότητας ή καταλληλότητας για συγκεκριμένο σκοπό. Αυτό το άρθρο προϋποθέτει ότι είστε εξοικειωμένοι με τη γλώσσα προγραμματισμού που επιδεικνύεται και με τα εργαλεία που χρησιμοποιούνται για τη δημιουργία και τον εντοπισμό σφαλμάτων διαδικασιών. Οι μηχανικοί υποστήριξης της Microsoft μπορούν να σας εξηγήσουν τη λειτουργικότητα μιας συγκεκριμένης διαδικασίας. Ωστόσο, δεν θα τροποποιήσουν αυτά τα παραδείγματα για να παρέχουν πρόσθετες λειτουργίες ή να δημιουργήσουν διαδικασίες για να καλύψουν τις συγκεκριμένες απαιτήσεις σας.
Για να προετοιμαστείτε για την εφαρμογή οποιουδήποτε από τα παρακάτω παραδείγματα, εκτελέστε πρώτα τα παρακάτω βήματα:
-
Ξεκινήστε το Excel και ανοίξτε ένα νέο βιβλίο εργασίας.
-
Πατήστε το συνδυασμό ΠΛΉΚΤΡων ALT + F11 για να ξεκινήσετε την επεξεργασία της Visual Basic.
-
Στο μενού Εισαγωγή , κάντε κλικ στην επιλογή λειτουργική μονάδα.
-
Πληκτρολογήστε το δείγμα κώδικα μακροεντολής στο φύλλο λειτουργικής μονάδας.
-
Πατήστε το συνδυασμό ΠΛΉΚΤΡων ALT + F11 για να επιστρέψετε στο Excel.
-
Στο Microsoft Office Excel 2003 και σε παλαιότερες εκδόσεις του Excel, επιλέξτε μακροεντολή από το μενού Εργαλεία και, στη συνέχεια, κάντε κλικ στην επιλογή μακροεντολές.
Στο Microsoft Office Excel 2007, κάντε κλικ στην επιλογή μακροεντολές στην ομάδα Κώδικας στην καρτέλα προγραμματιστής .
Εάν η καρτέλα προγραμματιστής δεν είναι διαθέσιμη, εξετάστε το ενδεχόμενο να
κάνετε το εξής: ένα. Κάντε κλικ στο κουμπί του Microsoft Office και, στη συνέχεια, κάντε κλικ στην επιλογή επιλογές του Excel.
β. Στην κατηγορία δημοφιλή , στην περιοχή κορυφαίες επιλογές για εργασία με το Excel, κάντε κλικ για να επιλέξετε την προβολή
Καρτέλα "Προγραμματιστής" στην κορδέλα και, στη συνέχεια, κάντε κλικ στο κουμπί OK. -
Επιλέξτε τη μακροεντολή που θέλετε και, στη συνέχεια, κάντε κλικ στην επιλογή εκτέλεση.
Η αποθηκευμένη ιδιότητα επιστρέφει την τιμή False εάν έχουν γίνει αλλαγές σε ένα βιβλίο εργασίας από την τελευταία φορά που αποθηκεύτηκε.
Μπορείτε να χρησιμοποιήσετε το δεσμευμένο όνομα υπορουτίνας Auto_Close για να καθορίσετε μια μακροεντολή που θα πρέπει να εκτελείται κάθε φορά που κλείνει ένα βιβλίο εργασίας. Με αυτόν τον τρόπο, μπορείτε να ελέγχετε τον τρόπο χειρισμού του εγγράφου όταν ο χρήστης κλείνει τα έγγραφα στο Excel.
Παράδειγμα 1: κλείσιμο του βιβλίου εργασίας χωρίς αποθήκευση αλλαγών
Για να επιβάλετε το κλείσιμο ενός βιβλίου εργασίας χωρίς να αποθηκεύσετε τις αλλαγές, πληκτρολογήστε τον παρακάτω κώδικα σε μια λειτουργική μονάδα της Visual Basic αυτού του βιβλίου εργασίας:
Sub Auto_Close ()
Αυτό. αποθηκευμένο = True
End Sub
Όταν η αποθηκευμένη ιδιότητα έχει την τιμή True, το Excel αποκρίνεται σαν να έχει ήδη αποθηκευτεί το βιβλίο εργασίας και δεν έχουν πραγματοποιηθεί αλλαγές από την τελευταία αποθήκευση.
Η ιδιότητα DisplayAlerts του προγράμματος μπορεί να χρησιμοποιηθεί για τον ίδιο σκοπό. Για παράδειγμα, η ακόλουθη μακροεντολή απενεργοποιεί το DisplayAlerts , κλείνει το ενεργό βιβλίο εργασίας χωρίς να αποθηκεύσει τις αλλαγές και, στη συνέχεια, ενεργοποιεί ξανά το DisplayAlerts .
Sub CloseBook ()
Application. DisplayAlerts = FALSE
ActiveWorkbook. Close
Application. DisplayAlerts = True
End Sub
Μπορείτε επίσης να χρησιμοποιήσετε το όρισμα SaveChanges της μεθόδου Close .
Η ακόλουθη μακροεντολή κλείνει το βιβλίο εργασίας χωρίς να αποθηκεύσει τις αλλαγές:
Sub CloseBook2()
ActiveWorkbook.Close savechanges:=False
End Sub
Παράδειγμα 2: κλείσιμο του βιβλίου εργασίας και αποθήκευση των αλλαγών
Για να επιβάλετε την αποθήκευση αλλαγών σε ένα βιβλίο εργασίας, πληκτρολογήστε τον παρακάτω κώδικα σε μια λειτουργική μονάδα της Visual Basic αυτού του βιβλίου εργασίας:
Sub Auto_Close ()
Εάν αυτό. αποθηκευμένο = FALSE, τότε
Αυτό. Αποθήκευση τέλους εάν
End Sub
Αυτή η διαδικασία ελέγχει για να δείτε εάν η ιδιότητα " Αποθήκευση αρχείου" έχει καθοριστεί σε False. Σε αυτή την περίπτωση, το βιβλίο εργασίας έχει αλλάξει από την τελευταία αποθήκευση και οι αλλαγές αυτές αποθηκεύονται.
