根据某些单元格条件在Excel中隐藏取消隐藏列的宏

Question

我想根据特定单元格中的值隐藏特定列。例如，在我的代码中，如果F26中的单元格值小于0.75，我想隐藏整个“ F”列。同样，如果G26中的值小于0.75，则隐藏“ G”列，依此类推。

Sub HideColumn1()
    Dim cel As Range
    For Each cel In Range("F26:AB26")
        If cel.Value < 0.75 Then
            Columns(cel).EntireColumn.Hidden = True
        Else
            Columns(cel).EntireColumn.Hidden = False
        End If
    Next cel
End Sub

当前，我的代码在线上给了我1004 error：

Columns(cel).EntireColumn.Hidden = True

Answer 1

如果您想忽略该错误，请尝试“下一步出错时继续”。