Microsoft Excel предлагает мощную функцию в виде макросов, которая может автоматизировать повторяющиеся задачи и выполнять многие операции, которые не могут быть выполнены встроенными функциями Excel. Однако бывают случаи, когда эти макросы могут стать избыточными или даже представлять потенциальную угрозу безопасности, особенно при совместном использовании вашей книги с другими. В такие моменты становится важным понимание того, как безопасно и эффективно удалять макросы. Это руководство создано, чтобы познакомить вас с различными методами удаления макросов из книг Excel, гарантируя, что при необходимости у вас будет чистый и оптимизированный файл.

• Сохранив файл в формате xlsx
• С помощью опции в один клик, предоставляемой Kutools

• Удалить макросы из книг в папке с VBA
• Удалите макросы из любых конкретных книг с помощью Kutools

Что нужно знать перед удалением макросов в Excel

• При открытии книги с поддержкой макросов и попытке удалить макросы сначала необходимо нажать кнопку Включить контент кнопку в вашей книге. Это необходимо, прежде чем вы сможете приступить к их удалению.
• 

• Примечание: Если вы не видите эту кнопку, это зеленый свет для удаления макросов. Причиной его отсутствия может быть то, что вы сами создали книгу со встроенными макросами и сохранили ее. При повторном открытии этой книги на том же компьютере с неизмененными настройками Excel Включить контент кнопка часто не появляется. Это связано с тем, что файл получен из надежного источника (вы) и находится в надежном месте (ваш компьютер).

• Помните, что после удаления макроса восстановление невозможно. Чтобы защитить вашу работу, рекомендуется создать резервную копию книги перед удалением макросов.

Удалить определенный макрос

Шаг 1. Откройте диалоговое окно «Макрос».

Перейдите в Застройщик И выберите Макрос для открытия Макрос диалоговое окно. (Если Застройщик вкладка не отображается в Excel, см. примечание после шагов.)

Шаг 2. Выберите и удалите конкретный макрос.

1. Развернуть «Макросы внутри» раскрывающееся меню и выберите желаемое место, откуда удалить макросы.
2. Из списка макросов выберите тот, который хотите удалить.
3. Нажмите Удалить.
4. 

Удалить все макросы из книги

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

Удалите все макросы из книги, сохранив файл в формате xlsx.

Формат книги Excel (*.xlsx) по своей сути не поддерживает макросы. Таким образом, сохранение книги в этом конкретном формате приведет к автоматическому удалению всех встроенных макросов. Чтобы выполнить этот метод, пожалуйста, действуйте следующим образом:

1. Перейдите в Файл > Сохранить как.
2. Разверните раскрывающееся меню типа файла и выберите «Книга Excel (* .xlsx)формат.
3. Наконечник: Вы можете ввести новое имя для файла .xlsx в текстовом поле над раскрывающимся меню. Чтобы сохранить файл в другом месте, нажмите ЛИСТАТЬ СПИСКИ.
3. Нажмите Сохранить.
4. 

   Примечание: Ассоциация Сохранить как Интерфейс может отличаться в разных версиях Excel. Если вы не видите правую панель, как показано выше, где доступен выбор формата файла, вы всегда можете нажать ЛИСТАТЬ СПИСКИ а затем выберите формат «Книга Excel (*.xlsx)».

4. В появившемся окне подсказки выберите Да.
5. 

Результат

В результате сохраняется новый файл в формате «.xlsx» без макросов. Этот файл .xlsx примет имя исходного файла .xlsm и сохранится в том же месте.

Удалите все макросы из книги с помощью опции одним щелчком мыши, предоставляемой Kutools.

Kutools for Excel, расширенная надстройка Excel, предоставляет пользователям возможность одним щелчком мыши легко удалить все макросы, встроенные в книгу. Одним щелчком мыши вы можете очистить модули VBA, пользовательские формы, диалоговые листы Excel 5/95 и листы макросов Excel 4 XLM.

Открыв книгу, содержащую макросы, которые хотите удалить, перейдите к Кутулс Вкладка и выберите Удалить > Удалить все макросы. И вуаля, все готово!

Удалить все макросы из нескольких книг

Столкнувшись с задачей удаления макросов из нескольких книг, вы можете использовать два подхода:

Удалить все макросы из книг в папке с VBA

В этом разделе я покажу, как эффективно удалять макросы из всех книг в указанной папке с помощью макроса VBA.

Шаг 1: Создайте новый модуль

1. Нажмите Alt + F11 для открытия Visual Basic для приложений (VBA) редактор.
2. Нажмите Вставить > Модули для создания нового модуля.
3. 

Шаг 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.
3. 

Результат

После того, как макрос завершит обработку всех файлов Excel в выбранной папке и удалит из них макросы, вы увидите сообщение «Удаление макросов завершено!" окно сообщения.

Удалите все макросы из любых конкретных книг с помощью Kutools

Kutools for Excel предоставляет удобный способ удаления всех макросов из нескольких книг. Для тех, кто колеблется или не знаком с методами VBA, Kutools служит идеальной альтернативой. Имея в своем распоряжении этот инструмент, можно легко удалить модули VBA, пользовательские формы, диалоговые листы Excel 5/95 и листы макросов Excel 4 XLM.

После загрузка и установка Kutools для Excel, выполните следующие шаги:

1. Выберите Кутулс > Удалить > Пакетное удаление всех макросов.
2. 
2. В Пакетное удаление всех макросов В появившемся диалоговом окне все открытые книги будут перечислены для удаления макросов. Вот что вам нужно сделать дальше:
   1. Чтобы добавить дополнительные книги для удаления макросов, нажмите кнопку Добавить кнопку и выберите либо Файл or Папка.
   2. Если есть какие-либо книги, которые вы хотите исключить из процесса удаления макросов, нажмите кнопку кнопку, чтобы удалить их.
   3. После того, как вы перечислили в диалоговом окне все нужные книги для удаления макросов, нажмите OK.
   4. 

Результат

Появится новое диалоговое окно, в котором будет указано, сколько книг Kutools обработало для удаления макросов. После нажатия OK, будет создана автоматизированная сводная книга для описания результатов.

Выше приведен весь соответствующий контент, связанный с удалением макросов в Excel. Я надеюсь, что этот урок окажется для вас полезным. Если вы хотите узнать больше советов и рекомендаций по Excel, Пожалуйста, нажмите здесь чтобы получить доступ к нашей обширной коллекции из более чем тысячи учебных пособий.

Статьи по теме

• Как запустить макрос на основе значения ячейки в Excel?
• Как запустить макрос при изменении значения ячейки в Excel?
• Как запустить один и тот же макрос на нескольких листах одновременно в Excel?