excel 如何使用VBA进行数据筛选贴到另外一个表格中

答案:1 悬赏:70 手机版

解决时间 2021-01-04 21:52

提问者网友：酱爆肉
2021-01-03 22:34

excel 中如何将一个表1中的部分数据筛选复制到表2中，并且表1中数据更改，表2也更改。数据量比较大，需使用VBA.
表1
员工编号员工姓名工作卡号身份证部门
00012 张1 10213 ‘123456789123456 1
00020 张2 11128 ‘123456123123456 1
00021 张3 12043 ‘123456789123456 2
01981 张4 12958 ‘123456123123456 3
01986 张5 13873 ‘123456789123456 2
01989 张6 14788 ‘123456123123456 2
10124 张7 15703 ‘123456789123456 1
10121 张8 16618 ‘123456123123456 3
10123 张9 17533 ‘123456789123456 2
25713 张10 18448 ‘123456123123456 2
25714 张11 19363 ‘123456789123456 3
如何将部门为1的记录筛选到表2中，并且表1中更改数据，表2也相应更改？特别强调一下是表1，表2 ，不是在同一个表中的sheet1，sheet2，谢谢了

最佳答案

五星知识达人网友：西风乍起
2021-01-03 23:00

就是录制一个宏，如
Sub NewFilter()
Sheets("表2").Select
Sheets("表1").Range("A2:Q164").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets _
("条件表").Range("B2:I4"), CopyToRange:=Range("A2:Q2"), Unique:=False
End Sub

我要举报

如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！