[已解决]请修改代码

ymq123 · 发表于 2014-4-20 17:25

请修改代码
   筛选要求：请把各表中数字相同的行大于2行的筛选出来，表格1筛选后放到工作表2表格1里，表格2筛选后放到工作表2表格2里，表格3筛选后放到工作表2表格3里，其它类推，放到对应表格里。
   代码窗口里代码不能放到指定表格里，请老师帮助修改。
  谢谢！

最佳答案

zjdh

2014-4-20 17:53

zjdh · 发表于 2014-4-20 17:53

ymq123 · 发表于 2014-4-20 20:13

zjdh 发表于 2014-4-20 17:53

老师你好，
如果工作表2中，各表格是18行，代码怎么修改。
谢谢！

zjdh · 发表于 2014-4-20 20:21

ymq123 发表于 2014-4-20 20:13
老师你好，
如果工作表2中，各表格是18行，代码怎么修改。
谢谢！

For r = 1 To 47 Step 23 中
47为最后一个表的首行行号
23为每个表的行数加1

你自己理解着改吧。

ymq123 · 发表于 2014-4-20 21:12

zjdh 发表于 2014-4-20 17:53

老师你好，
我把工作表2中各表格行数改了一下，自己没有修改成功，请你帮助。
现在把附件重发给你。
谢谢！

zjdh · 发表于 2014-4-21 13:18

ymq123 · 发表于 2014-4-21 15:09

zjdh 发表于 2014-4-21 13:18

谢谢！

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