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

yigepure · 发表于 2005-5-13 00:49

以下是引用Long_III在2005-3-18 17:11:00的发言： yigepure兄，帮我看看非文本的为什么不可以啊？像第一栏的日期！～

现在才看到龙兄的回复.对于VBA我不懂.我还要请教你耶.

到时可以倾囊相授哟:)

程序版也该增加一位版主了

guangyp · 发表于 2005-5-13 00:58

以下是引用yigepure在2005-5-13 0:49:00的发言： ～

现在才看到龙兄的回复.对于VBA我不懂.我还要请教你耶.

到时可以倾囊相授哟:)

程序版也该增加一位版主了

支持，另外清风兄也是一位不错的高手，增加两位吧。

[此贴子已经被作者于2005-5-13 1:00:43编辑过]

apolloh · 发表于 2005-5-13 08:22

给个建议

If sht.Name <> "汇总" Then

可以改成

If sht.index <> activesheet.index Then

这样不用担心，汇总表名被修改的情况

Long_III · 发表于 2005-5-13 08:28

谢谢apolloh兄的建议!

我刚开始做的时候，一般都是在VBE中点执行，所以就固定了表的名称！

不过，里面的代码很好懂，每个人都可以按自己的要求修改

whc0316 · 发表于 2005-5-13 14:55

long哥给的这个例子真的是很实用,其中的一些内容我看不懂,请给指点一下: Dim H As New Collection 这个New Collection 是什么呢?我在帮助里面找不到,所以请大家给指点一下.谢谢

Long_III · 发表于 2005-5-13 15:10

whc0316兄，这是一个集合，在帮助中有很多

附：

Collection对象返回

Collection 对象是项目所组成的有序集合，可以把这个集合作为单元来引用。

说明

Collection 对象提供了简便方法，直截了当将一组相关的项目视为单一对象来引用。集合中的项目或成员被这样一个事实联系起来：它们都属于这个集合。集合的成员不一定都是同一种数据类型的。

建立集合的方法与建立其它对象的方法一样。例如：

Dim X As New Collection

一旦建立集合之后，就可以用 Add 方法添加成员，用 Remove 方法删除成员。在用 For Each...Next 语句重复整个集合时，可以用 Item 方法从集合返回特定成员。

whc0316 · 发表于 2005-5-13 15:35

太感谢了long哥,经过你的指点我已经明白了,虽然我还是没能在帮助中找到这个东西,不过从你这找到了,太好了,这个东西真的是非常好用.谢谢

weihua113 · 发表于 2005-5-15 00:48

太有用了！！

moohl · 发表于 2005-5-23 16:12

非常有用!!!

plxmm · 发表于 2005-5-23 16:19

又向 Long_III GG 学到了东东哦。

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

实用派作品