Excel中，怎样判断一张工作簿中是否包含某一工作表？求代码！

记录没有的次数并与表数比较，如何啊
Sub 检测()
Dim i As Long
For i = 1 To Worksheets.Count
If Worksheets(i).Name = "过梁" _
Then Exit Sub
Else:
x = x + 1
End With
Exit Sub
Next
If x = Sheets.Count Then
Sheets.Add after:=Sheets(Sheets.Count)
ActiveSheet.Name = "过梁"
With ActiveWorkbook.Sheets("过梁").Tab
.Color = 1
End If
End Sub

以下代码测试通过

Sub 检测()
Dim tf As Boolean
Dim rng As Worksheet, rng2 As Worksheet
For Each rng In Worksheets
If rng.Name <> "过梁" Then
tf = True
Else
tf = False
End If
Next
If tf = True Then
Set rng2 = Sheets.Add(after:=Sheets(Sheets.Count))
rng2.Name = "过梁"
Sheets("过梁").Tab.Color = 1
Else
Application.Quit
End If
End Sub