Закрыть все открытые книги Excel

Если после работы необходимо быстро закрыть большое количество файлов Excel, то сделать это поможет надстройка VBA-Excel

Решение задачи

Чтобы закрыть все выбранные книги Excel необходимо:

  1. Перейти на вкладку VBA-Excel, которая будет доступна после установки.
  2. Перейти в меню Диспетчеры и выбрать пункт Диспетчер книг.
    Запуск диспетчера книг
  3. В окне диспетчера выберите книги, которые необходимо закрыть и нажмите на кнопку Закрыть выбранные.
    Закрытие выбранных книг

Код на VBA

Код макроса, который проходит по списку открытых книг и закрывает выбранные файлы.

Private Sub btn_Close_Click()
    Dim i As Long
    For i = 0 To LBox_Wb.ListCount - 1
        If LBox_Wb.Selected(i) = True Then Workbooks(LBox_Wb.List(i, 1)).Close
    Next
End Sub
Надстройка
VBA-Excel
Надстройка для Excel содержит большой набор полезных функций, с помощью которых вы значительно сократите время и увеличите скорость работы с программой.