表1
表二
宏
Sub 高級篩選()
Sheets("Sheet1").Columns("A:b").AdvancedFilter Action:=xlFilterCopy, _
CopyToRange:=Range("A1:b1"), Unique:=False
End Sub
表1
表二
宏
Sub 高級篩選()
Sheets("Sheet1").Columns("A:b").AdvancedFilter Action:=xlFilterCopy, _
CopyToRange:=Range("A1:b1"), Unique:=False
End Sub