VBA



" Then Sheets("") Delete



" Then Sheets("").Delete

End If

Next

'