工作表的新建和删除

  • 新建:Worksheets.Add 方法 (Excel)

创建新的工作表、图表或宏工作表。新工作表成为活动工作表。

语法

Worksheets.Add(Before、After、Count、Type)

参数

名称 必需/可选 数据类型 说明
Before 可选 Variant 指定工作表的对象,新建的工作表将置于此工作表之前。
After 可选 Variant 指定工作表的对象,新建的工作表将置于此工作表之后。
Count 可选 Variant 要添加的工作表数。默认值为 1。
Type 可选 Variant 指定工作表类型。*

*:Type可以是下列的**XlSheetType** 常量之一: xlWorksheet、 xlChart、 xlExcel4MacroSheet或xlExcel4IntlMacroSheet。如果要基于现有模板插入工作表,请指定模板的路径。默认值为 xlWorksheet。

返回值

表示新工作表、图表或宏工作表的 Object 值。

备注

如果同时省略 Before 和 After,则新工作表插入到活动工作表之前。

例:

Sub sample_Add() '在最后加入新的Sheet 'Worksheets.Count :总的Sheet数    Worksheets.Add after:= Worksheets(Worksheets.Count)    '将活动的Sheet名字变更为newSheet ActiveSheet.Name = 'newSheet'End Sub
  • 删除:Worksheets. Delete 方法 (Excel)

删除工作表。

语法

Worksheets. Delete

Sub sample_Delete()    '具体指定工作表名删除    Worksheets('newSheet').Delete    '指定工作表下标删除    Worksheets(2).Delete    '当前活动Sheet删除    ActiveSheet.DeleteEnd Sub

备注:

直接删除的时候会弹出下面这样提示框。

只需使用DisplayAlerts屏蔽掉弹出框就可以了。

Application.DisplayAlerts = False(禁止弹出提示框)

Application.DisplayAlerts = True(允许弹出提示框)

Sub sample_Delete2() Application.DisplayAlerts = False Worksheets('newSheet').Delete Application.DisplayAlerts = TrueEnd Sub
(0)

相关推荐

  • Application.DisplayAlerts不显示警告对话框

    如果删除一张表,可以右击表标签,进行删除. 使用VBA的代码如下,意思是指删除第2张表. Sheets(2).delete 使用VBA可以循环处理,批量删除很多张表. 注意,以下代码是错误的: Pri ...

  • VBA从工作表另存为工作簿

    Sub 宏1() Application.ScreenUpdating = False '屏幕更新关闭 Application.DisplayAlerts = False '显示和预警提示关闭 Dim ...

  • 别让闪屏瞎了眼,一个语句搞定

    Application后面可以有很多属性,方法.我只介绍最常用的几个 今天介绍Application.ScreenUpdating,比较常见的一个语句. 举例说明,假设你有三张表. 绘制一个按钮,编写 ...

  • Excel VBA之第五十九课

    大家好,这节课我们学习工作表的Delete方法,Delete方法用于删除已经存在的工作表.在删除工作前,系统会弹出警告框,询问是否删除工作表.所以在实际编辑代码时,如果有必要的话可以使用Applica ...

  • Excel批量删除指定关键字Sheet名称的工作表,助力办公效率提升

    Excel情报局 Excel职场联盟 生产搬运分享Excel基础技能 Excel爱好者大本营 用1%的Excel基础搞定99%的职场问题 做一个超级实用的Excel公众号 Excel是门手艺玩转需要勇 ...

  • 菜鸟记197-1分钟快速新建1000个工作表

    关键词:EXCEL2016:数据透视表:批量新建工作表:批量操作工作表:操作难度** 工作中如果需要在一个工作簿中新建指定名称的工作表,您是不是这样操作的? 如果需要新建成百上千个工作表(当然实践中很 ...

  • VBA编程练习08:删除工作表而不显示提示信息

    excelperfect 本次的练习非常简单,但在许多场合都会用到. 本次练习题 当我们删除工作簿中的工作表时,Excel会自动弹出"MicrosoftExcel将永久删除此工作表.是否继续 ...

  • excel删除工作表快捷键是什么?

    excel快捷键如下: 在工作表中移动和滚动向上.下.左或右移动单元格箭头键 移动到当前数据区域的边缘:CTRL+ 箭头键 移动到行首:HOME 移动到工作表的开头:CTRL+HOME 移动到工作表的 ...

  • Excel VBA 7.61听说你会用VBA批量删除工作表?但重要数据不是你想删就能删的

    一起学习,一起进步~~ 昨天我们学习了一下批量删除空白工作表的方法,那么自然工作表的删除就没有任何的问题了,不过有时候当我们通过VBA批量删除工作表数据的时候,可能会碰到一个问题,一时兴起把一些主要的 ...

  • Excel表格如何加密,使不能插入和删除工作表?

    Excel表格中有一个比较好用的功能,可以保护工作表的结构,以防别人修改,下面就让小编来详细的跟大家操作一下吧! 1.打开一个Excel表格,将打开的工作表加密,点击上方的--文件选项. 2.在文件列 ...

  • Excel VBA 7.60需要删除无用工作表时,加班派:手动删,高效派:VBA删

    一起学习,一起进步~ 说起工作表的删除,在昨天我们分享了一种方法,就是删除空白工作表的,但是日常工作中,要删除的并不仅仅是空白工作表,大多数时候还是有数据的非空工作表,一方面因为非空工作表本身的数据比 ...

  • 删除工作表中不需要的行,就这么简单

    小伙伴们好啊, 有这样一份数据,需要将G列金额为0的数据行全部删除,而且不能打乱数据的先后顺序. 普通青年 : 1.在右侧列,也就是H2单元格中输入公式 =0/G2 2.保持H列选中状态,按Ctrl+ ...

  • 【技巧系列】-3秒百张,批量新建工作表

    "小编你又诈尸!" 对小编又回来了,接下来的一段时间,小编将每天为大家更新一大波小技巧 轻松办公,提前下班不是梦! 作为办公一族,经常需要批量新建一批工作表,数量少的情况下,我们可 ...