Foxtable(狐表)用户栏目专家坐堂 → excel多页命名


  共有4086人关注过本帖树形打印复制链接

主题:excel多页命名

帅哥哟,离线,有人找我吗?
13770324704
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:11 积分:183 威望:0 精华:0 注册:2022/5/3 20:30:00
excel多页命名  发帖心情 Post By:2022/5/3 21:28:00 [只看该作者]

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

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

如何操作?

 


 回到顶部
帅哥哟,离线,有人找我吗?
13770324704
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:11 积分:183 威望:0 精华:0 注册:2022/5/3 20:30:00
  发帖心情 Post By:2022/5/3 21:41:00 [只看该作者]

 Ws.Copy(After:=.Item(.Count))'复制到最后面
复制结束如何命名?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105948 积分:538809 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/4 21:15:00 [只看该作者]


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

 回到顶部