Sub addSheet()
Dim ws As Worksheet
For Each ws In Worksheets
If ws.Name = "testT" Then End
Next ws
Worksheets.Add.Name = "testT"
End Sub
说明:判断当前Excel里头的sheet里头是否有个sheet名称叫testT 没有的的情况下,创建一张testT表格
VBA-创建sheet表
最新推荐文章于 2024-05-01 07:58:00 发布