本文介绍了一种使用VBA编程的方法来判断一个指定名称的工作表是否已经存在于当前工作簿中。通过遍历所有工作表并比较名称，可以实现新增工作表前的检查逻辑。
增加一个新sheet 的时候，怎么判断是否存在
各位高人怎么用程序判断是工作簿中存在的工作页，在增加新页的时候，，
帮帮忙
yygy 2003-8-26 19:33
Dim WORK As Worksheet
Bool = False
ss="新页名称"
For Each w In ThisWorkbook.Worksheets
If w.Name = ss Then
Bool = True
Exit For
End If
Next w
If Bool = False Then
Set WORK = ThisWorkbook.Worksheets.Add
WORK.Name = ss
End If
Bool = False
ss="新页名称"
For Each w In ThisWorkbook.Worksheets
If w.Name = ss Then
Bool = True
Exit For
End If
Next w
If Bool = False Then
Set WORK = ThisWorkbook.Worksheets.Add
WORK.Name = ss
End If
扫一扫
334
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
