您的位置: 首页 > EXCEL技巧 > ExcelVBA >

用VBA判断工作表是否存在

时间:2013-12-10 整理:docExcel.net

下面的VBA代码可以判断当前Excel工作簿中的某个工作表是否存在,如果指定的工作表不存在,则以指定的工作表名新建一个工作表,如果指定的工作表已存在,则给出一个提示,并激活该工作表。下例中指定的工作表标签为“一月”,可根据实际进行修改。

Sub IsSheetExist()
Dim ws As Worksheet
Dim sName As String
sName = "一月"  '指定工作表
On Error Resume Next
Set ws = Sheets(sName)
If ws Is Nothing Then '指定的工作表不存在
   Sheets.Add.Name = sName
Else '指定的工作表已存在
   MsgBox "“" & sName & "”工作表已存在。"
   ws.Activate
End If
End Sub

用VBA判断工作表是否存在 问题:用VBA判断工作表是否存在
回答:下面的VBA代码可以判断当前Excel工作簿中的某个工作表是否存在,如果指定的工作表不存在,则以指定的工作表名新建一个工作表,如果指定的工作表已存在,则给出一个提示,并激活该工作表。下例中指定的工作表标签为“一...
判断工作表是否存在的公式 问题:判断工作表是否存在的公式
回答:...公司的报表,为了防止更改工作表名称,兰色准备设置“判断工作表名称是否存在”的公式,如果更改,就会提示“工作表名称不符合上报要求”。   如下图所示的excel文件中,"日报表"是不得更改的工作表名...
如何判断你的初创企业是否有募资潜力 问题:如何判断你的初创企业是否有募资潜力
回答: 英文原文:Is Your Startup Fundable? 你是否曾经考虑过优质的投资商真正寻找一个初创企业时是如何考虑该企业是否真正值得去投钱进去呢?Right Click Capital 的合作伙伴和 Sydney Founder Institute 的联合懂事 Benjamin Chong 在文章“3 个...
计算机视觉版的图灵测试出现了 问题:计算机视觉版的图灵测试出现了
回答:...是(2 号) 研究人员将所提的问题被分为 4 类: 存在判断 独立性判断 属性判断 关系判断 存在判断和独立性判断这两类问题用于引导计算机对所提问内容进行认定,随后计算机会对其标记(如人物标为1,车辆为3),...
停机问题证明致命机器人无法正确决定是否杀死 问题:停机问题证明致命机器人无法正确决定是否杀死
回答:    停机问题是一个判断任意一个程序一旦启动是否会在有限的时间之内结束运行的问题。艾伦·图灵在 1936 年证明不存在解决停机问题的通用算法。现在,一组计算机科学家和伦理学家使用停机问题去处理一个武...
在Excel中判断单元格是否包含日期 问题:在Excel中判断单元格是否包含日期
回答:Excel中的系列“Is”类函数可以判断指定值并返回TRUE或FALSE,如ISNUMBER函数判断是否为数字、ISTEXT判断是否为文本等。但Excel没有提供一个判断日期的工作表函数,如“IsDate”。如果要检测某单元格是否为日期,可以用CELL函数...
相关知识:

下面内容对您也许有用

      话题:如何用vba代码 判断excel工作表中存在图表
      答:Private Sub Workbook_SheetActivate(ByVal Sh As Object)MsgBox ActiveSheet.ChartObjects.Count End Sub
      话题:vba 如何判断工作簿中是否存在指定工作表清单?知道
      问:1、比如需要判断工作簿中是否存在名为“浙江”、“广东”、“江苏”、“湖南”、
      答:1、Dim wsh As Worksheet,str1$str1="浙江,广东,江苏,湖南,广西"For Each wsh In Worksheets If InStr(str1,wsh.Name)Then Call SUB1 Else Call SUB2 End If 用VBA判断工作表是否存在 如何用vba代码 判断excel工作表
      话题:在EXCEL工作簿中如何使用VBA判断当前活动工作表在工作簿中的
      问:在执行完一个宏后,一般情况下最后一个工作表会变成活动工作表,我想让活动工作表
      答:假定开始执行宏的工作表名称是“封面”,则在编写的宏代码结束时加上下面的代码即可:Sheets("封面").Activate
      话题:vba开发 判断sheet页是否存在
      答:方法一、关闭错误报告后去获取工作表,然后检测是否失败 '安全获取工作表,即使没有这个表也不报错 Private Function GetSheet(ByVal sname As String)As Object Excel VBA怎么判断 一个sheet 如何用vba代码 判断excel工作表
      话题:如何用VBA判断另1个EXCEL表是否已经打开
      问:我有2个表,表1表2.我想用表1的按钮来打开另个表,但如果表2已经被打开,并且还
      答:应该是工作薄的打开问题,如果是同一工作薄的不同sheet,只要该工作薄打开,就 不存在工作表(sheet)是否打开的问题 判断表2(准确说法:工作薄2)是否打开,
      话题:excel vba判断文件是否存在
      答:请根据情况,选择一种适合你的方法。一、通过FileExists判断文件是否存在Dim MyFile As ObjectSet MyFile=CreateObject("Scripting.FileSystemObject")If MyFile excel vba判断文件是否存在 用VBA判断工作表是否存在
      话题:EXCEL VBA新建工作表?知道
      问:我建立了一个EXCEL银行进帐单打印表格,现需要保存进帐单的数据而自动新建工作表
      答:当你数据保存时判断工作表是否存在,如果存在的话将内容保存进去,如果不存在的话新建一个工作表并将内容保存进去。你也可以考虑是否采用一个单位用一个工作簿。
      话题:根据每位学生的成绩,用VBA模块程序(宏)自动判断成绩等级,
      问:根据每位学生的成绩,用VBA模块程序(宏)自动判断成绩等级,并将该模块程序(宏
      答:你的程序没有错,出错是下标越界的话,就是说没有sheet4这个工作表。引用了不存在工作表。看看工作表有没有sheet4。 3.简述在Excel中从用户界面(如 vba 的高手来看看Excel宏的程序
      话题:vba 判断字符串是否是已经存在的路径
      问:Sub a()dim b As String b="C:\zy\"End Sub 请问该如何判断b是不是一个已经存在
      答:Dim fso As Scripting.FileSystemObject Set fso=New Scripting.FileSystemObject Msgbox fso.FileExists(b)参照里最好有“Microsoft Scripting Runtime” 请问:在VBA怎样判断在Excel选定 如何判断一个常量字符串是否为数
      话题:如何用VBA控制循环只在当前工作表进行?知道
      问:现存两个工作簿Book1和Book2,两个工作簿各设一张数据汇总表,该数据汇总表的
      答:你是把代码是放在哪里,单独分开放在book1和book2还是放其他地方了,不知道你是怎么调用gname function的? EXCEL VBA循环的问题 Excel vba 循环效率
最新评论