使用VBA在excel中隐藏列

使用VBA在excel中隐藏列,excel,vba,Excel,Vba,我试图使用VBA基于单元格值隐藏多个列(可以为空或0)。这些单元格还有一个数组查找公式,我认为这会停止通过VBA隐藏正常列的功能。例如,共有40列,最多6列包含通过VLookup数组从另一个工作表获得的值。包含值的6列可以是VLookup中40列中的任意一列。要开始,这里有一个基本宏,它将检查某个范围内的每个单元格,如果满足任一条件,则当前列将被隐藏。需要根据需要更改图纸名称和范围 Dim cel As Range For Each cel In ThisWorkbook.Sheets

我试图使用VBA基于单元格值隐藏多个列(可以为空或0)。这些单元格还有一个数组查找公式,我认为这会停止通过VBA隐藏正常列的功能。例如,共有40列,最多6列包含通过VLookup数组从另一个工作表获得的值。包含值的6列可以是VLookup中40列中的任意一列。

要开始,这里有一个基本宏,它将检查某个范围内的每个单元格,如果满足任一条件,则当前列将被隐藏。需要根据需要更改图纸名称和范围

Dim cel As Range

    For Each cel In ThisWorkbook.Sheets("Sheet1").Range("A1:J20")
        If cel.Value = "0" Or cel.Value = "" Then
            cel.EntireColumn.Hidden = True
        End If
    Next cel

空白的值是多少<代码>“”?欢迎使用SO。这可以是空白的,也可以是0(对于Excel),空白和0是相同的。。。除非你所谓的空白不是真正的空白,而是你的公式返回的
”,请包括你的样本数据和预期结果以及你尝试过的代码。这样,我们可以帮助您更准确地确定如何解决问题。哪一行有可能的值?