问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

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

发布网友 发布时间:2024-09-30 12:00

我来回答

1个回答

热心网友 时间:2024-10-21 11:11

在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
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
拉丁是什么舞种 拉丁舞是什么舞种 拉丁舞分别是哪五种舞 重庆毛戈平形象设计学校学校课程 毛戈平学校怎么 毛戈平形象艺术学校学费多少 重庆毛戈平形象设计艺术学校学校详情 五级英语书本常用表达法句子 小学五年级英语常用语法 工程师挂靠什么意思 燃气热水器控制器多少钱 excel防止重复输入设置excel重复数据标记和圈释无效数据 excel重复输入名字怎么设置excel重复输入名字怎么设置格式 vivoy23插上耳机有声音不插就没声 为什么vivoy23手机非得插上耳机才会有声音 拼多多口令怎么转链接 索尼a6000白天拍人像怎么调参数 索尼a5100拍人像怎么调参数 需要WindowsXP-KB926140-x86-CHS(PowerShell1.0)(1.65M)这个文件... Office含有多个需要激活授权信息无法删除的解决办法包含了管理员切换到... 脚脱皮又痒怎么办;不知道用什么方法呢 脚脱皮又痒怎么办 电脑开机后刚要到开机画面就黑屏,能看见主机两灯都亮,显示屏指示灯也亮... ...才可以开启?开了之后又出现警报?这是为什么? ...要restart重启以下才行 是中毒了 还是硬件老化了 电脑启动时显示器无信号,必须要再次按下重启键才能显示... 电脑开机时显示器显示无信号之后就黑屏,按重启键之后显示器才亮。_百度... 电脑开机总有响声,过个30秒就好了。开机时显示器总不亮 必须按下重启... 福建南安教师招聘成绩查绚 ...>1-)f(x)=s,证明级数Σ(n=0..∞)an收敛且和为s tan(x)的幂级数展开怎么算? ps怎样画有数值的矩形ps怎样画有数值的矩形边框 邻居买农具是什么意思呀 五一放几天家啊??谢谢了,大神帮忙啊 ...2013年春节有几天是带薪休假?谢谢了,大神帮忙啊 春节 复活节 龙舟节 中秋节几月几日谢谢了,大神帮忙啊 五一法定节假日放几天假?谢谢了,大神帮忙啊 梦见别人把鬼装代子里 梦见把油从油桶倒到自己包里 未成年人在明日方舟充钱会打电话吗? Excel表格中的内容不全怎么办呢? 百合花搭配泡茶 肾图检查流程 1×2加2×3加3×4依此类推九十九×100等于多少 通项为an=1/N+1的数列之和Sn的极限是多少? 老年抑郁症如何心理疏导 梦见眼睛被切掉了下面的一半儿,很奇怪,是什么意思呢? 微信注册必须手机号吗? 今年15岁,刚刚初中毕业,不想上学了,想去学个厨师,锻炼几年,然后开个... 谢姓男孩名字大全属龙 ...一(1)班借走了9本,一(2)班还回来了20本,现在图书角有多少本图_百度...