Для того, чтобы сохранить выбранные книги в Excel необходимо:
Ниже приведен код макроса. В цикле выполняется поиск выбранных книг и их сохранение.
Private Sub btn_SaveWb_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)).Save End If Next End Sub