Adaptar una macro para que no suba hojas que ya se cargaron
Para Elsa Matilde:
Estimada, es posible adaptar la macro Unifica Libros en Excel, ¿para qué no cargue libros que ya existen?
Por ejemplo, si he cargado 7 libros y adiciono 3 mas, que tenga una condición en no subir los que ya existen y solo los nuevos. Finalmente, cuando los suba el promedio se actualice.
1 respuesta
Respuesta de Elsa Matilde
1
En ese caso agregué algunas líneas para controlar si el nombre de hoja ya se encuentra en el libro. Y en ese caso se cerrará sin avisar y seguirá con la captura de otros libros.
El primer control es por si el libro capturado no tiene la hoja RESUMEN, en ese caso te enviará un mensaje de 'sinHoja'.
Workbooks. Open (Archi)
wb2 = ActiveWorkbook.Name
'03/10--------
nbreho = Left(Sheets("RESUMEN").[C12], 10) & "-" & Sheets("RESUMEN").[C30]
'se controla posible error de no encontrar hoja Resumen
If nbreho = "" Then GoTo sinHoja
'controla si ya existe esta hoja, en ese caso se cierra el libro y sigue con otro libro
For Each sh In Workbooks(librox).Sheets
If sh.Name = nbreho Then
ActiveWorkbook.Close False
GoTo sigue: Exit For
End If
Next sh
'----------
'se copia la hoja cerrando el libro a continuación
With Workbooks(wb2)
