剪切满足条件的整行数据到其他工作表中

山山好又快

gdfcx 发表于 2011-11-12 11:41
你说的所谓增加应该是修改原来完工过的，这个就要去已完工表中去修改。
如果有新需求可以新开贴在站内求 ...

谢谢您回复！

myyj821001

gdfcx 发表于 2011-5-11 10:28
Sub Macro1()
    Dim arr, brr(), i&, j&, m&, n%
    arr = Sheet3.[a3].CurrentRegion

你好！！你上面的代码可以用，而且效果完全跟我想要的一样，但我要用的表数据和格试跟上面的，判断的列和条件，表头等不一样，可不可以请你帮忙解释一下上面这段代码啊，就是每一步是什么意思，主要控制什么，我要改动一下才能用，谢谢你啊，因为是菜鸟所以基础差了点，麻烦你了，我QQ号107020700，可以发邮件

funsz

gdfcx 发表于 2011-5-11 10:28
Sub Macro1()
    Dim arr, brr(), i&, j&, m&, n%
    arr = Sheet3.[a3].CurrentRegion

老师，能否拆分不同的工作簿，一个是A.xlsx，另一个是B.xlsx，将A中满足条件的放到B中去

shaokui123

感谢分享，学习了

cyl8612

借此论坛求帮助，请各位大侠帮忙：谢谢！
1、表“项目数据（C表）”中G列为“奶牛”时，则该行的A列到E列的信息自动复制到表“奶牛数据（B表）”中对应的A到E列。
2、表“仙姑数据（C表）”中L列为“6.1.中标-合同签约”或“8.已交货待调试”或“9.调试完毕”时，则该行所有数据自动剪切到表“历史C项目表”中，即在原表中自动删除。
3、表“奶牛数据（B表）”中I列为“暂停跟进”或“关闭”时，则改行所有数据自动剪切到表“历史B奶牛表”中，即从原表中自动删除该行所有信息。