Как удалить листы Excel в VBA?

Question

Как удалить все листы Excel в книге, кроме первых двух листов, используя для следующего цикла?

For 
Next

Answer 1

Рассматривать:

Sub Killer()
    j = Sheets.Count
    For i = j To 3 Step -1
        Sheets(i).Delete
    Next i
End Sub

Если хотите, вы можете отключить оповещения перед запуском цикла.