高級篩選不重複數據至指定表 宏 複製表1到表2 數據不重複的宏

高級篩選不重複數據至指定表 宏 複製表1到表2 數據不重複的宏

表1

高級篩選不重複數據至指定表 宏 複製表1到表2 數據不重複的宏

表二

Sub 高級篩選()

Sheets("Sheet1").Columns("A:b").AdvancedFilter Action:=xlFilterCopy, _

CopyToRange:=Range("A1:b1"), Unique:=False

End Sub


分享到:


相關文章: