- excel表格教程:Excel数据表实现动态小计
- excel vba教程:只能录入某种特征的Excel数据
- xcel表格制作教程入门:9E307,在Excel里可以这么用~
- xcel表格制作教程入门:让Excel图表自动适应窗口大小
Sub 新建工作表()
Dim Irow As Integer, Sht As Worksheet
Irow = 2
Set Sht = Worksheets("数据")
On Error Resume Next
Do While Sht.Cells(Irow, "A").Value ""
If Worksheets(Sht.Cells(Irow, "A").Value) Is Nothing Then
Worksheets.Add after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = Sht.Cells(Irow, "A").Value
End If
Irow = Irow + 1
Loop
End Sub
以上过程供参考。
上一篇:excel教程:《别怕,Excel VBA其实很简单(第3版)》 下一篇:excel宏教程:将人民币数字金额转为中文大写
郑重声明:本文版权归原作者所有,转载文章仅为传播更多信息之目的,如作者信息标记有误,请第一时间联系我们修改或删除,多谢。