电脑教程
位置:首页>> 电脑教程>> office教程>> 在excel中利用VBA在工作簿中创建新的工作表

在excel中利用VBA在工作簿中创建新的工作表

  发布时间:2022-03-20 07:12:53 

标签:名称,工作,指定,新建,Excel函数

在VBA中,可以用Sheets.Add 方法在工作簿中新建工作表。其语法是:

Sheets.Add(Before, After, Count, Type)

其中参数Before、After指定新建工作表的位置,Coun指定工作表的数量,Type指定新建工作表的类型。如下例:

在工作簿新建一个名称为“工作表1”的工作表:

Sub AddWorksheet()
On Error Resume Next
Worksheets.Add().Name = "工作表1"
End Sub

在最后一个工作表的后面新建名称为“工作表2”的工作表:

Sub AddWorksheetAfterLast()
On Error Resume Next
Worksheets.Add(After:=Worksheets(Worksheets.Count)).Name = "工作表2"
End Sub

在最后一个工作表的前面新建4个工作表:

Sub Add4Worksheets()
Worksheets.Add Before:=Worksheets(Worksheets.Count), Count:=4
End Sub

运行下面的代码中,首先给出一个提示,要求用户输入新建工作表的名称,然后用该名称新建工作表。如果出现错误,如名称过长或该名称已被使用,将直接新建一个工作表。

Sub AddNameNewSheet()
Dim NewName As String
NewName = InputBox("请输入新建工作表的名称。")
On Error Resume Next
Sheets.Add.Name = NewName
End Sub

0
投稿

猜你喜欢

  • 在Excel中经常在录入好数据以后要对数据进行统计计算,其中计算总和是Excel中最为基本的要素,接下来是小编为大家带来的如何用excel计
  • 在word中可以设置文档背景即设置文档纸张的颜色。在Word中可以设置单色背景和设置渐变、纹理等填充效果的背景,今天我们就给大家介绍两种wo
  • word软件是用户用来编辑文档的一款办公软件,是用户的必备办公软件,用户在使用时可以在文档页面上插入表格来同统计数据,用户还可以使用软件中的
  • 今天,我将简要分析在win10系统中设置桌面图标间距的方法。升级win10系统后,有些用户会认为win10系统中桌面图标的默认间距太大。实际
  • 图表布局是指图表组成元素如图表标题、图例、坐标轴、数据系列、网格线等的显示方式。一般而言,创建的图表采用的是默认的图表布局方式,用户若要更改
  • 日常的办公中,在向表格填入数据时,合理运用下拉列表可以大大节省数据录入时间,提高正确性,不但方便自己也方便了别人。那么如何才能快速、有效的使
  • 当我们需要在Excel表格当中找出一组数据重复了几次,即统计重复数据出现的次数时,难道一个一个的在表格当中数出来吗?当然不必,今天我们就来教
  •                在Excel2003中为表格
  • Win8系统怎么不重装系统直接升级到Win10系统?许多已经下载安装了win8系统的用户发现win8系统一点都不好用,想要将win8系统升级
  • Excel中一元方程式怎么求解?excel中计算是强项,用它来计算单变量求也很简单,今天我们就来看看excel中一元方程的方法,很简单,下面
  • 在表格表头单元格中,我们经常需要使用斜线在分割内容,来达到分栏的效果,在excel当中该如何画出来呢?下面就跟小编一起看看吧。excel单元
  • 平常单位的一些进货单出库单类的表格都是用excel制作的,今天单位没有考勤表了,于是我就用excel制作考勤表,这样就不用出去买了,而且单位
  • Excel中VBA怎么使用字典Dictionary对象的通用代码?Excel中想使用字典Dictionary对象功能该怎么使用呢?下面我们就
  • 书签主要用于帮助用户在Word长文档中快速定位至特定位置,或者引用同一文档(也可以是不同文档)中的特定文字。在Word2010文档中,文本、
  • 在excel表格中,图表经常会代替数据, 但是这些图表是如何插入到表格中的呢?下面随小编一起来看看吧。Excel插入图表的步骤点击新建空白文
  • 在Excel中在录入好数据之后经常都需要进行的打印,或许还有朋友还不懂得如何去打印,所以不妨学习一番增加知识。接下来是小编为大家带来的如何用
  • 苹果推出了全新 AirPods 3 无线蓝牙耳机,将于本月 26 日正式发售。在考虑是否购买这款新产品之前,可以全面了解下新一代 
  • 有人问在WORD2007里面输入空格键会显示四方块,也无法在空格处添加下划线,选中空格处按下划线按纽没反应,或下划线不见了怎么办。今天,小编
  • 在Excel中,如果要从字符串右侧提取指定长度的字符,将电话号码中的区号和号码分隔开来,可以使用RIGHTB函数从字符串右侧提取指定长度的字
  • 当我们使用win10操作系统计算机时,在某些情况下,我们的系统可能会堵塞,启动速度慢。那么,关于win10版1903如何加快计算机启动速度的
手机版 电脑教程 asp之家 www.aspxhome.com