擅長
可以實現高級過濾，假設
經過
工作表中的數據如下圖所示:
代碼如下:
12345Sub？演示()與？ActiveSheet。範圍(" $A$1:$E$9 ")。高級過濾器？xlFilterInPlace，？。範圍(" $G$1:$G$3 ")結束？WithEnd？潛水艇
操作效果:
PS: G列的條件可以隨意添加，只要在代碼中動態確定G列的最後壹行和前面數據區的最後壹行即可。