Excel宏删除不包含正整数的列

我有一个Excel电子表格，它有几个列。这些列中的许多列都有全零。我希望能够隐藏或删除所有不包含值>=1的列。使用Excel 2016，但我也在不同的机器上使用Excel 2013和2010，以防万一会有所不同

---

我是新手，所以想象一下你在向一个两岁的孩子解释；一个聪明的两岁小孩，但还是个蹒跚学步的孩子。提前感谢您的帮助。

在活动范围中，您可以在A列中搜索负片或空白，例如设置范围，它将使用循环遍历列范围中的每个单元格并隐藏任何空白内容，或者我建议您在第一步中使用VBA宏录制器记录希望Excel为您执行的操作：之后，查看代码，并通过突出显示VBA关键字并按F1尝试理解代码。此外，我建议您阅读以下内容：之后，您应该自己为上述问题提供第一个解决方案。如果您仍然有问题，请随时回到这里，就您试图编写的代码征求具体建议。首先确定是否要“隐藏或删除”列，然后尝试查找一些代码并根据您的目的对其进行修改。你甚至可以把它录下来。

Sub Hide_blank_rows()

Dim C As Range

For Each C In ActiveSheet.Range("A1:A5")
If C.Value = "" Or C.Value <= 0 Then
C.EntireRow.Hidden = True
Else
C.EntireRow.Hidden = False
End If
Next C

End Sub