Excel VBA在一列具有特定值时删除重复项

有人能帮我吗

在这种情况下，我需要删除带有“ok”和“cancelled”的重复行。只需要status=“met”

注意：文件的行数超过5k

number | status   |
123       ok
123       met
123       cancelled
124       ok
125       met

---

如果您只想删除状态为“确定”或“已取消”的“重复项”，请在数据旁边添加一列，并使用此公式（对于我来说，数据位于a列和B列，我添加了C列）

把这个一直拖下去

获取数据->过滤器。仅在第三列中过滤（保持）TRUE。选择筛选数据中的行并删除

---

卸下滤清器。如果您只想删除状态为“确定”或“取消”的“重复项，则应保留所需行，然后在数据旁边添加一列，并使用此公式（对于我来说，数据位于a列和B列，我已添加C列）

把这个一直拖下去

获取数据->过滤器。仅在第三列中过滤（保持）TRUE。选择筛选数据中的行并删除

---

卸下滤清器。您应该留下所需的行

数据/过滤器，然后从过滤器中选择“确定”并取消，然后删除“如果<代码>数字字段不重复且状态为<代码>确定”的内容。您仍然需要删除此行吗？如示例Data/Filter中的

124-ok

，然后从筛选器中选择ok并取消，然后删除如果

number

字段不重复且状态为

ok

。您还需要删除这一行吗？如您的示例中的

124-ok

C2 =AND(SUMPRODUCT(--($A$2:$A$6000=A2))>1,OR(B2="ok",B2="cancelled"))