for hidden sheet, you can check if hidden sheet, then make it visible before you delete.
if Sheets("MFL").Visible = false then
Sheets("MFL").Visible = true
Sheets("MFL").Select
ActiveWindow.SelectedSheets.Delete
else
Sheets("MFL").Select
ActiveWindow.SelectedSheets.Delete
end if