删除包含数千行的多个数据集中包含零的行

Question

亲爱的Stackoverflow社区，

我的数据分析需要一些帮助。我目前感到困惑的是如何为具有数千行的多个数据集删除其中包含0的行。我很确定我可以使用visual basic来做这件事，但由于我没有太多的编程经验，所以我希望你能提供帮助。

我附上了一张图片，其中我突出显示了我想要删除的两行示例。我希望删除红色和黄色的所有内容，而绿色和白色的所有内容都可以单独删除。如果有人知道如何做到这一点，请帮忙！

Image of excel data

非常感谢你的时间和考虑！

致以最诚挚的问候，

BurekKebab

Answer 1

这非常简单，可以通过多种方式完成。

你可以运行我提供的宏来清除行（你说删除，但我认为你的意思是清楚）

此宏循环遍历您要删除的范围中的单元格，找到零，然后删除行的交叉和您指定的范围。

例如，我将数据放在A-E列

中

在这种情况下，我在列C-E或Range("C1:E18")

中查找零

当找到零时，我清除行和范围相交。

整个过程也可以使用过滤器完成 - 您可以运行宏并删除3列为空的行。

Sub DeleteTheZeroes(TheRange As Range)
Dim c
For Each c In TheRange
    If c.Value = 0 Then Intersect(c.EntireRow, TheRange).Value = ""
Next c
End Sub

Sub Test()
'Change the range as needed when calling the macro
'You could also use DeleteTheZeroes Selection and highlight the data
DeleteTheZeroes Range("C1:E18")
End Sub