savrinor

Tengo el siguiente Macro, para eliminar automáticamente, las hojas 1 y 2, Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.DisplayAlerts=False Worksheets("Hoja1").Delete Worksheets("Hoja2").Delete Application.DisplayAlerts=True End Sub...