excel中使用vba新建一个工作表的方法
来源:网络收集 点击: 时间:2024-03-04首先我们打开一个工作样表作为例子。

使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:
Option Explicit
Sub ddt()
Dim a As Integer
a = InputBox(请输入工作表编号)
ThisWorkbook.Sheets.Add Before:=Worksheets(a) 添加一个新工作表在第一工作表前
End Sub

写这段代码的时候我们需要理解add这个命令的作用,在sheets对象中,add命令就是增加一个新的sheets(工作表),这里用一个空格befor:=来表示是在该表格之前。

工作表序列的表示方法有三种,这里写的是用的序列表示,如果我们要在特定的工作表前新建一个工作表,我们也可以直接指定,比如像这样写
ThisWorkbook.Sheets.Add Before:=Sheets(5月工资)

如果写具体的工作表名称是能够达到准确的目的,但是为了灵活性,我们还是建议选择序列方式新建工作表更加的容易一些。所以这里我们使用了inputbox函数通过输入来获取工作表的序列。

需要注意的的是,对于变量的声明一定要做好数值型的声明,如果使用变量默认声明,那么会出现声明错误,导致序列下标错误。

先写到这里了,谢谢大家的观看。
祝大家生活愉快。
小编还有许多其他的经验可以观看,如果无法解决问题可以联系小编进行咨询。
看不清楚图片的可以点击放大再看哦。
注意事项个人经验,仅供参考。
EXCEL单元格表格版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.1haoku.cn/art_245015.html