Πίνακας περιεχομένων
Αναγκάστε το βιβλίο εργασίας να αποθηκευτεί - Workbook_BeforeClose
Δεν θα συνιστούσα να το χρησιμοποιήσετε, αλλά για πειραματισμούς και ως επίδειξη του ActiveWorkbook.Save:
Μπορείτε να αποθηκεύσετε ένα βιβλίο εργασίας χωρίς να δώσετε στον χρήστη μια επιλογή "Ναι/Όχι" με τον ακόλουθο κώδικα:
Τοποθετήστε το στη μονάδα ThisWorkbook…
1234567891011121314 | Private Sub Workbook_BeforeClose (Cancel As Boolean)Αν αποθηκευτεί = Λάθος ΤότεActiveWorkbook.SaveΤέλος εανΤέλος υπο |
Αυτό δεν λειτουργεί για πολλά βιβλία εργασίας. Για να λειτουργήσει με πολλαπλά βιβλία εργασίας, θα πρέπει να τοποθετήσετε τον κώδικα στο αρχείο personal.xls ή να τον βολέψετε σε όλα τα ανοιχτά βιβλία εργασίας.