使用VBA过滤工作表数据

使用：Excel 2007。

问题：电子表格包含许多列和数据行。 一列称为“概率”，包含0％到100％之间的百分比值。 如何写一个macros，有条件地删除一个行，因为它的“概率”值小于 50％？

更新：这不能简单地通过录制一个macros来完成，因为百分比值会随着每次新的数据上传而变化。

谢谢！

Answer 1

例如，如果您的概率数据位于活动工作表的A列中，则可以使用自动filter

1. 手动，自动筛选列，添加一个<50％的标准，然后删除结果

2. 在代码中运行相同的方法如下

   Sub QuickCull() Application.ScreenUpdating = False With ActiveSheet .AutoFilterMode = False .Columns("A").AutoFilter Field:=1, Criteria1:="<50%" .AutoFilter.Range.Offset(1, 0).EntireRow.Delete .AutoFilterMode = False End With Application.ScreenUpdating = True End Sub