Forum di Excel e VBA, per condividere esperienze e risolvere problemi su: Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
For Each sh In ActiveWorkbook.Worksheets If sh.Index > 3 Then Application.DisplayAlerts = False sh.Delete Application.DisplayAlerts = True End If Next