
Cerrar dos libros de EXCEL desde VBA
Publicado por antonio (5 intervenciones) el 24/04/2015 01:28:47
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Dim oExcel As Object
Set oExcel = CreateObject("Excel.Application")
Set objWorkbook1 = oExcel.Workbooks.Open(libro1$) 'Abro 2 libros
Set objWorkbook2 = oExcel.Workbooks.Open(libro2$)
oExcel.Application.DisplayAlerts = False
oExcel.Application.Visible = False
'........proceso
'........
oExcel.ActiveWorkbook.Save 'Guardo y cierro el primer libro (libro activo) FUNCIONA
oExcel.ActiveWorkbook.Close
oExcel.Workbooks(libro2$).Save 'Intento guardar el segundo libro, PERO ESTO NO FUNCIONA
oExcel.Workbooks(libro2$).Close
Valora esta pregunta


0