使用VBA来检查工作表，可以使用稍微复杂的代码，也可以使用简单的代码，下面是两种范例：
一、检查工作表是否存在
①简单代码
If Sheets("MyTable") Is Nothing Then
MsgBox "该工作表不存在"
else
MsgBox "该工作表已存在"
End If
②稍微复杂的代码
Dim iCount As Integer
For iCount = 1 To Sheets.Count
If Sheets(iCount).Name = "Sheet99" Then
MsgBox "Sheet99已经存在"
Exit Sub
End If
Next iCount
二、删除某个工作表
①简单代码
Sheets(96).Delete
Sheets"Sheet96").Delete
上述是两种简单的删除形式，下面看更为复杂点的！
②稍微复杂的代码
Application.DisplayAlerts = False
Dim Mysht As Object
For Each Mysht In ThisWorkbook.Worksheets
If Mysht.Name <> "大众计算机" Then
Mysht.Delete
End If
Next
Application.DisplayAlerts = True