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

Як видалити макроси з Excel (повний посібник)

Microsoft Excel пропонує потужну функцію у вигляді макросів, яка може автоматизувати повторювані завдання та виконувати багато операцій, які не можуть виконати вбудовані функції Excel. Однак є випадки, коли ці макроси можуть стати зайвими або навіть створювати потенційні ризики безпеці, особливо під час спільного використання робочої книги з іншими. У ці моменти важливо розуміти, як безпечно та ефективно видалити макроси. Цей посібник створено, щоб ознайомити вас із різноманітними методами видалення макросів із ваших робочих книг Excel, гарантуючи, що ви матимете чистий, спрощений файл, коли це буде потрібно.


Що потрібно знати перед видаленням макросів у Excel

  • Відкриваючи книгу з підтримкою макросів і намагаючись видалити макроси, ви повинні спочатку клацнути Увімкнути вміст кнопку у вашій робочій книжці. Це необхідно, перш ніж ви зможете продовжити їх видалення.
  • Примітка: Якщо ви не бачите цієї кнопки, це зелене світло для вас, щоб продовжити та видалити макроси. Причиною його відсутності може бути те, що ви самостійно створили робочу книгу з вбудованими макросами та зберегли її. Під час повторного відкриття цієї книги на тому самому комп’ютері та з незмінними налаштуваннями Excel, Увімкнути вміст кнопка часто не відображається. Це тому, що файл походить із надійного джерела (ви) і знаходиться в надійному місці (ваш комп’ютер).

  • Пам’ятайте, що після видалення макросу відновлення неможливе. Щоб захистити вашу роботу, радимо створити резервну копію робочої книги перед видаленням будь-яких макросів.

Видаліть певний макрос

Крок 1: Відкрийте діалогове вікно макросу

перейдіть до Розробник Вкладка і виберіть Макрос відкрити Macro діалогове вікно. (Якщо Розробник вкладка не відображається у вашому Excel, див. примітку після кроків.)

Порада:
  • Якщо ви використовуєте Excel 2013 або новішу версію, Макрос кнопку також можна знайти в межах вид Вкладка.
  • Любителі ярликів можуть натискати безпосередньо Alt + F8 щоб отримати доступ до Macro діалогове вікно.

Крок 2. Виберіть і видаліть певний макрос

  1. Розгорнути "Макроси в" у спадному меню та виберіть потрібне місце призначення, звідки потрібно видалити макроси.
  2. Зі списку макросів виберіть той, який потрібно видалити.
  3. Натисніть видаляти.

Примітки:

  • Щоб додати Розробник на стрічку в Excel, виконайте такі дії:
    1. Клацніть правою кнопкою миші будь-де на стрічці та виберіть Налаштувати стрічку….
    2. У списку Основні вкладки у правій частині вікна, що з’явиться, поставте прапорець біля Розробник і натисніть кнопку OK.
  • Якщо ви маєте намір видалити кілька макросів, вам доведеться повторити описаний вище процес для кожного окремого макросу. Щоб отримати інструкції щодо пакетного видалення всіх макросів, перейдіть до наступних розділів.

Видалити всі макроси з книги

У випадках, коли потрібно видалити всі макроси з книги, ось два способи:


Видаліть усі макроси з книги, зберігши файл у форматі xlsx

Формат «Робоча книга Excel (*.xlsx)» не підтримує макроси. Таким чином, збереження робочої книги в цьому форматі призведе до автоматичного видалення всіх вбудованих макросів. Щоб застосувати цей метод, виконайте такі дії:

  1. перейдіть до філе > Зберегти як.
  2. Розгорніть спадне меню типу файлу та виберіть "Книга Excel (* .xlsx)"формат.
  3. Порада: Ви можете ввести нову назву для файлу .xlsx у текстовому полі над спадним меню. Щоб зберегти файл в іншому місці, натисніть перегорнути.
  4. Натисніть зберегти.
  5. Примітка: Команда Зберегти як інтерфейс може відрізнятися в різних версіях Excel. Якщо ви не бачите правої панелі, як показано вище, де доступний вибір формату файлу, ви завжди можете клацнути перегорнути а потім виберіть формат «Книга Excel (*.xlsx)».

  6. У вікні підказки, що з’явиться, виберіть Так.

Результат

У результаті зберігається новий файл у форматі ".xlsx" без макросів. Цей файл .xlsx матиме назву вихідного файлу .xlsm і буде збережено в тому самому місці.

Примітка: Цей метод не видаляє форми користувача, діалогові аркуші Excel 5/95 і подібні елементи. Якщо ви прагнете їх усунути, скористайтеся наступним методом.


Видаліть усі макроси з робочої книги за допомогою опції одним клацанням миші, наданої Kutools

Kutools для Excel, розширена надбудова Excel, надає користувачам можливість одним клацанням миші легко видалити всі макроси, вбудовані в книгу. Одним клацанням миші ви можете очистити модулі VBA, форми користувача, діалогові аркуші Excel 5/95 і аркуші макросів Excel 4 XLM.

Відкривши книгу, що містить макроси, які потрібно видалити, перейдіть до Кутулс Вкладка і виберіть видаляти > Видалити всі макроси. І вуаля, готово!

Примітка: Хочете отримати доступ до цієї функції? Завантажити Kutools для Excel зараз! Окрім цього, Kutools може похвалитися безліччю 300+ інших функцій і пропонує 30-денну пробну версію. Не чекайте, спробуйте вже сьогодні!


Видаліть усі макроси з кількох книг

Коли постає завдання вилучити макроси з кількох робочих книг, ви можете застосувати два підходи:


Видаліть усі макроси з робочих книг у папці з VBA

У цьому розділі я покажу, як ефективно видалити макроси з усіх робочих книг у визначеній папці за допомогою макросу VBA.

Примітка: Перш ніж видаляти макроси за допомогою макросу VBA, потрібно:
  • перейдіть до філе > Опції > Центр безпеки > Налаштування центру довіри > Налаштування макросу, потім виберіть "Довіряйте доступу до об’єктної моделі проекту VBA".
  • Переконайтеся, що під час виконання цього VBA у вказаній папці не відкрито робочі книги. Запуск із відкритими книгами може призвести до помилок.

Крок 1: Створіть новий модуль

  1. прес Alt + F11 відкрити Visual Basic для додатків (VBA) редактор.
  2. Натисніть Insert > Модулі щоб створити новий модуль.

Крок 2: Скопіюйте код VBA у вікно модуля

Скопіюйте наведений нижче код VBA та вставте його у відкрите вікно Модулі вікна.

Sub RemoveMacrosFromWorkbooks()
' Update by ExtendOffice

    Dim wb As Workbook
    Dim FolderPath As String
    Dim filename As String
    Dim VBComp As Object
    Dim VBProj As Object

    With Application.FileDialog(msoFileDialogFolderPicker)
        .title = "Select a folder"
        .Show
        If .SelectedItems.Count = 0 Then
            MsgBox "No folder selected. The procedure will exit.", vbExclamation
            Exit Sub
        End If
        FolderPath = .SelectedItems(1)
    End With

    If Right(FolderPath, 1) <> "\" Then FolderPath = FolderPath + "\"

    filename = Dir(FolderPath & "*.xls*")
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    On Error Resume Next
    Do While filename <> ""
        Set wb = Workbooks.Open(FolderPath & filename)

        If wb.HasVBProject Then
            Set VBProj = wb.VBProject
            
            For Each VBComp In VBProj.VBComponents
                VBProj.VBComponents.Remove VBComp
            Next VBComp
        End If

        wb.Close SaveChanges:=True

        filename = Dir
    Loop
    Application.ScreenUpdating = True
    Application.DisplayAlerts = True
    MsgBox "Macros removal completed!", vbInformation

End Sub

Крок 3. Запустіть код VBA

  1. У Модулі вікно, натисніть F5 або натисніть кнопку кнопку для виконання вставленого коду.
  2. У Виберіть папку у вікні, яке з’явиться, виберіть папку, що містить книги, з яких потрібно видалити макроси, і натисніть OK.

Результат

Коли макрос завершить обробку всіх файлів Excel у вибраній папці та видалить із них макроси, ви побачите "Видалення макросів завершено!" вікно повідомлення.

Примітки:

  • Цей метод не видаляє форми користувача, діалогові аркуші Excel 5/95 і подібні елементи. Якщо ви прагнете їх усунути, скористайтеся наступним методом.
  • Активація довірчого доступу до об’єктної моделі проекту VBA може становити загрозу безпеці. Рекомендується вмикати опцію лише під час виконання цього коду. Переконайтеся, що ви скасували вибір "Довіряйте доступу до об’єктної моделі проекту VBA" після завершення виконання коду.

Видаліть усі макроси з будь-яких конкретних робочих книг за допомогою Kutools

Kutools для Excel забезпечує зручний спосіб видалення всіх макросів із кількох робочих книг. Для тих, хто вагається або не знайомий з методами VBA, Kutools є ідеальною альтернативою. Завдяки цьому інструменту у вашому розпорядженні модулі VBA, форми користувача, діалогові аркуші Excel 5/95 і аркуші макросів Excel 4 XLM можна легко видалити.

Примітка: Щоб запустити цю функцію, потрібно мати довірений доступ до об’єктної моделі проекту VBA. В Excel перейдіть до філе > Опції > Центр безпеки > Налаштування центру довіри > Налаштування макросу, потім виберіть "Довіряйте доступу до об’єктної моделі проекту VBA".

після завантаження та встановлення Kutools для Excel, виконайте такі дії:

  1. Select Кутулс > видаляти > Пакетне видалення всіх макросів.
  2. У Пакетне видалення всіх макросів у діалоговому вікні, яке з’явиться, усі відкриті робочі книги перераховані для видалення макросу. Ось що вам потрібно зробити далі:
    1. Щоб додати більше робочих книг для видалення макросу, натисніть додавати і виберіть будь-яку з них філе or Папка.
    2. Якщо є робочі книги, які ви бажаєте виключити з процесу видалення макросу, натисніть їх видалити.
    3. Після того, як у діалоговому вікні ви перерахували всі робочі книги, які потрібно видалити, клацніть OK.

Результат

З’явиться нове діалогове вікно, у якому вказано, скільки робочих книг Kutools обробив для видалення макросу. Після натискання OK, для окреслення результатів буде створено автоматизовану зошит.

Примітки:

  • Хочете отримати доступ до цієї функції? Завантажити Kutools для Excel зараз! Окрім цього, Kutools пропонує понад 300 інших функцій. З 30-денною безкоштовною пробною версією немає причин чекати. Спробуйте сьогодні!
  • Активація довірчого доступу до об’єктної моделі проекту VBA може становити загрозу безпеці. Рекомендується вмикати опцію лише під час роботи функції. Переконайтеся, що ви скасували вибір "Довіряйте доступу до об’єктної моделі проекту VBA" після того, як функція завершить своє виконання.

Вище наведено весь відповідний вміст, пов’язаний із видаленням макросів у Excel. Сподіваюся, підручник буде для вас корисним. Якщо ви хочете ознайомитися з іншими порадами та підказками щодо Excel, Будь ласка, натисніть тут щоб отримати доступ до нашої великої колекції з понад тисячі посібників.

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations