Закрыть все открытые книги 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