以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  excel多页命名  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=176939)

--  作者:13770324704
--  发布时间:2022/5/3 21:28:00
--  excel多页命名

属性表中有符合条件的名称多个(张三、李四、王五。。。)

从模板中复制同一张表sheet并把sheet命名为张三、李四、王五。。。

如何操作?

 


--  作者:13770324704
--  发布时间:2022/5/3 21:41:00
--  
 Ws.Copy(After:=.Item(.Count))\'复制到最后面
复制结束如何命名?
--  作者:有点蓝
--  发布时间:2022/5/4 21:15:00
--  

Ws.Copy(After:=.Item(.Count))
Dim Wsa As MSExcel.WorkSheet = Wb.WorkSheets(Wb.WorkSheets.Count)
Wsa.name = "张三"