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

txlgq · 发表于 2005-7-25 15:07

谢谢!!!!!!!

谢谢Long_III

txlgq · 发表于 2005-7-25 15:25

麻烦Long_III 高手,再改一下表内添加的代码,如果有同名的工作表存在,将数据添加相应表格原有数据的后面!

我自己想改,但水平太差,辛苦了!!1

Long_III · 发表于 2005-7-25 15:49

如果没有同名的工作表存在呢？不会还要增加一个工作表吧

这也……，需要考虑的太多了吧

再说了，我新增的工作簿里面根本就没有给新增的工作表增加名称，我都是用里面默认的sheet1作为名称

请问txlgq，这还需要改sheet1的名称吗？

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

按我上面说的修改了，代码我看着都费事了，你验证验证吧

caWmdQBr.rar (15.81 KB, 下载次数: 97)

[此贴子已经被作者于2005-7-25 16:00:12编辑过]

txlgq · 发表于 2005-7-25 15:56

我不是这个意思,我的意思是指你写的表内按条件分开形成的工作表,如果第二次运行表内分开,将数据接至原来工作表的后面!!!再次感谢!!!

'如果工作簿"H-表内外分开VBA"总表运行hjs后生成(表内分开方式)"程荣'工作表有6条记录,再次运行后,"程荣"工作表的记录增加到12条

[此贴子已经被作者于2005-7-25 16:01:19编辑过]

Long_III · 发表于 2005-7-25 16:04

代码改来改去，太乱了，本来可以简化很多的，现在也复杂了

先前还是表外，现在修改表内，我都晕了，126楼是我按你说得表外修改的

如果改表内的话，我有空再改了，今天还得忙别的事呢

如果改好了，给你短消息

clc907 · 发表于 2005-7-27 11:29

求助：现有一Excel表（总表），20行20列，若想从第5列开始自动提取一列与前四列生成一张张新表（共计生成17张新表），行数保持不变，该如何处理，谢谢，叩谢。

wangcai19822 · 发表于 2005-7-27 12:03

呵呵，一石激起千程浪~~

今日见龙三兄一贴，实让小弟钦佩不已！收藏先…………

这个分表要得~

xiarryll · 发表于 2005-7-27 15:15

非常有用!!!

王晖辉 · 发表于 2005-7-30 22:42

谢谢！！！

cxddx0 · 发表于 2005-7-31 11:35

非常好的东西，谢谢楼主分享

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