[分享]工作表按条件分开！(可以为表内，也可为表外）2005-10-21更新

Long_III · 发表于 2005-3-24 09:03

以下是引用dslgz在2005-3-23 22:02:00的发言：
这工具很实用，但我认为有个缺点，能否设置一个拆分后的工作表索引表？另拆分后想重拆分，原工作薄内已拆分的工作表能否设置一个删除键来删除已拆分工作表？我删除的方法是按CTRL键后用鼠标点击想删除的表，按右键选择删除，但我觉得有点麻烦，不知还有什么更快捷的方法？

早先做的一个hyperlinks的例子，其中的分表是按照固定的行数拆分的，自己看看代码吧

对于这样的小程序，不可能实现太多的功能，否则就很麻烦了，而且只能满足部分人

jZO950Az.rar (49.51 KB, 下载次数: 406)

心可以清 · 发表于 2005-3-24 10:52

原来真是一个好东西，比较实用的。

Long_III · 发表于 2005-3-28 11:25

最新更新，附件在1楼，可以实现分开的表复制到表外

huntxp · 发表于 2005-3-28 12:52

谢谢了

l52888 · 发表于 2005-4-6 14:55

好，收了

lj1226189 · 发表于 2005-4-6 15:09

佩服之至！

感谢龙兄为我们提供这么好的学习机会！

lj1226189 · 发表于 2005-4-6 15:14

能否做一个反过来实现把各个分表合并到总表上的程序！

shyy · 发表于 2005-4-6 17:24

收了!太好了!!将按钮放到菜单上就更好了!

anjing572 · 发表于 2005-4-7 00:54

请问楼主如果拆分的表里有空行或别的不想拆分的数据,就不行了,具体请看我的这个表

qNmdBJOJ.rar (10.96 KB, 下载次数: 86)

Long_III · 发表于 2005-4-7 08:37

Tanjing572

你好，我确认范围的代码是irow = .[a1].CurrentRegion.Rows.Count，也就是选中A1按Ctrl+A的效果，如果有某行为空白下面的就不包括了，【处理方法：删除你的数据里面的空白行】

由于我的代码中多处使用此种方法确定最大行，故不适宜更改代码！

		自动登录	找回密码
密码			免费注册

[分享]工作表按条件分开！(可以为表内，也可为表外）2005-10-21更新

真是名符其实的侠圣！

顺便问一下！