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

Question

我有一个包含多个列的Excel电子表格。其中许多列都包含全部为零。我希望能够隐藏或删除所有不包含值＆gt; = 1的列。使用Excel 2016但我也在不同的计算机上使用Excel 2013和2010，以防万一有所作为。

我是新手，所以想象一下，你要向一个2岁的孩子解释一下;一个聪明的2岁孩子，但仍然是一个蹒跚学步的孩子。在此先感谢您的帮助。

Answer 1

在活动范围内（范围是您在其中搜索底片或空白的列），例如，A列设置您的范围，它将使用循环遍历列范围中的每个单元格并隐藏任何空白或＆lt; = 0

将（“A1：A5”）中的字母更改为您需要搜索的列。

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

请注意，您将来必须发布一些代码。