这是一个利用VBA自动筛选的实例 附有数据库及全套代码