分类

已解决如何将工作表的内容拆分(比如工作表里有上千的名字，如何将一千个名字按一百拆分)

提问者：尝试后才知道 | 浏览次 | 提问时间：2019-02-26 | 回答数量：1

如何将工作表的内容拆分(比如工作表里有上千的名字，如何将一千个名字按一百拆分)

已有1条答案

晴空_雪却泪

回答数：12 | 被采纳数：101

这个要写代码解决，给你个例子，代码如下Sub SplitSheet()Dim aa As Stringaa = ActiveSheet.NameFor x = 0 To 9 Sheets.Add After:=ActiveSheet Sheets(aa).[a1].Offset(x * 100, 0).Resize(100, 1).Copy ActiveSheet.[A1:A100]NextEnd Sub在sheet1准备好名单如何将工作表的内容拆分(比如工作表里有上千的名字，如何将一千个名字按一百拆分)(1)

如何将工作表的内容拆分(比如工作表里有上千的名字，如何将一千个名字按一百拆分)(1)

按ALT+F11将代码粘贴进去，然后关闭如何将工作表的内容拆分(比如工作表里有上千的名字，如何将一千个名字按一百拆分)(2)

按ALT+F8，点执行如何将工作表的内容拆分(比如工作表里有上千的名字，如何将一千个名字按一百拆分)(3)

然后就会自动生成10个表如何将工作表的内容拆分(比如工作表里有上千的名字，如何将一千个名字按一百拆分)(4)

如何将工作表的内容拆分(比如工作表里有上千的名字，如何将一千个名字按一百拆分)(5)

如何将工作表的内容拆分(比如工作表里有上千的名字，如何将一千个名字按一百拆分)(6)

...这只是个例子，根据实际情况，代码可能需要改动，有需要再联系我

2019-02-26 11:58:13