It er plagsom for deg å se etter de tomme regneark og fjerne dem én etter én, men med følgende VBA-kode, kan du enkelt slette alle tomme regneark samtidig. 
 1. Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vinduet. 
 2. Klikk Sett > Modul, og lim inn følgende kode i modulen vinduet 
 VBA. Slette alle tomme regneark 
 Sub DeleteBlankWorksheets () 'Update 20130830Dim Ws Som WorksheetOn Error Resume NextApplication.ScreenUpdating = FalseApplication.DisplayAlerts = FalseFor Hver Ws programmet. regneark Hvis Application.WorksheetFunction.CountA (Ws.UsedRange) = 0 Then Ws.Delete End IfNextApplication.ScreenUpdating = TrueApplication.DisplayAlerts = TrueEnd Sub3. Deretter trykker du F5-tasten, og alle de tomme regneark slettes samtidig. 
 

