Macro que elimine pestañas
Hola, he hecho una macro para eliminar pestañas de excel pero lo que necesito es que elimine todas las pestañas menos las 4 primeras, quiero que las 4 primeras siempre queden y se elimine el resto.
Aquí les dejo lo que he hecho ! ..... Gracias :)
Sub elimina()
ActiveSheet.Next.Select
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = False
End Sub
1 Respuesta
Respuesta de Luis Mondelo
1
Esta es tu macro:
Sub proceso() 'por luismondelo Application.DisplayAlerts = False For x = 5 To Sheets.Count Sheets(5).Delete Next End Sub
recuerda finalizar
