1. 当前sheet确认
   

2.Sheets(1).Delete

Sub Hello()
     '8 Sheets(1).Delete
     Sheets(1).Delete
End Sub

实验得知， Sheets(1).Delete删除的是最左边的sheet
另外，因为有弹出提示信息的确认框，这个在代码执行时，会导致还需要手动点击一下，因此需要加一段代码给去掉，这段代码在vba中非常常用

Sub Hello()
     '8 Sheets(1).Delete
     Application.DisplayAlerts = False '确认框关闭
     Sheets(1).Delete
     Application.DisplayAlerts = True '确认框打开
End Sub

3.指定名字Sheet6删除

Sub Hello()
     '9 Sheets("Sheet6").Delete
     Application.DisplayAlerts = False
     Sheets("Sheet6").Delete
     Application.DisplayAlerts = True
End Sub