摘要： Sub filter1()Rem MsgBox ("AAAAA")Rem 1 get selected zoneRem 2 loop rows and check columnRem 3 if true then hide it Dim pos, total Rem 获取行数total = Shee 阅读全文