作者：乔山办公网日期：
返回目录：excel表格制作
1、在工作表中，单击菜单栏[开发工具zd]，在其工具栏中，单击[Visual Basic]进入VBA界面。
2、在VBA界面中，单击菜单内栏中的[插入]，然后在下拉菜单中单击[模块]。
3、在代码编辑窗口，输入图片中的代码。
4、输入完代码之后，点击运行按钮。
5、接下来容就可以看到判断工作表是否存在了。
1、首先我们在工作表中，点击百菜单栏开发工具，在其中的工具栏里，点击visual basic,然后进入VBA界面，如下图。
2、然后我们在VBA界面里，点击菜单栏插入度，在其中的菜单中，点击模块，具体操作方法如专下图。
3、我们然后再在代码的编辑窗口中，输入代码再然后点击VBA窗口下工具栏中的运行按钮，方法如下图。
4、最后我们点击VBA窗口下工具栏中的运行按钮，接下来会属弹出存在或不存在的对话框，这就是具体的操作方法。
遍历复for each 来比对也是可以制的
或则
Sub iexist()
On Error Resume Next
If Sheets(sname) Is Nothing Then
MsgBox "工作表zhidao不存在"
Else
MsgBox "工作表存在"
End If
End Sub
1、不是百所有错误都度能起作用。
2、用知循环检测是否已有“汇道总”表专，没有则添加属：
for i=1 to sheets.count
if sheets(i).name="汇总" then exit sub
next
sheets.add……