Перейти до основного матеріалу

Як відключити запит на збереження при закритті книги?

Кожного разу, коли ви закриваєте файл Excel без збереження, з’являється запит на збереження, щоб підтвердити, чи закривається без збереження чи ні, що може вас дратувати. Тепер я представляю вам деякі коди VBA, щоб вимкнути запит на збереження під час закриття книги.

Вимкніть запит на збереження за допомогою коду VBA в ExcelM


стрілка синя права міхур Вимкніть запит на збереження за допомогою коду VBA в Excel

Тут я представляю два коди VBA, щоб ви відключили запит на збереження. Один закриє Excel, не зберігаючи, коли ви закриваєте книгу безпосередньо, а другий - Excel, зберігаючи останню зміну, внесену при закритті книги.

1. прес Alt + F11 відкрити Microsoft Visual Basic для програми вікна.

2. клацання Insert > Модулі щоб відкрити вікно модуля, скопіюйте наступний VBA у вікно.

VBA: закрити, не зберігаючи безпосередньо.

Sub Auto_Close()
    ThisWorkbook.Saved = True
End Sub

3. клацання прогін кнопка або F5 клавішу на клавіатурі для запуску цього коду. Потім, коли ви закриваєте книгу Excel, вона закриється безпосередньо і не збереже останню зміну.

Якщо ви хочете закрити Excel із збереженням змін, ви можете використовувати цей код VBA.

VBA: Закрити із збереженням.

Sub Auto_Close()
    If ThisWorkbook.Saved = False Then
        ThisWorkbook.Save
    End If
End Sub

примітки: Другий VBA не працює з новими книгами, які ви ніколи не зберігали раніше.


Відносні статті:

Найкращі інструменти продуктивності офісу

Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями    Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул    Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок    Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

вкладка kte 201905


Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
i tied and it worked only for the current file. I want to keep that setting for all files i'll be working.
This comment was minimized by the moderator on the site
Does not work. Tried it in my personal workbook, tried it in my add on. I want it to work for all workbooks. Windows should have this option in their settings.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations