通过VB检查Excel中单元格的值

时间:2018-07-20 07:06:11

标签: excel-vba

我想检查excel中选定的单元格,如果该单元格中的值等于零,则隐藏行。 例如 从E4到E10的单元格,我想对此单元格中的值进行循环,如果单元格的值为零,则隐藏行

1 个答案:

答案 0 :(得分:0)

请使用以下示例代码作为解决方案。

Sub Hide()
    Dim i as Integer
    For i = 4 To 10
        Dim d As String, row As Integer
        d = Sheet1.Range("E" & i).Value
        Sheet1.Range("E" & i).Select
        If d<>"" Then
          If d = 0 Then
              Sheet1.Range("E" & i).EntireRow.Hidden = True
          End If
        End If
    Next i
End Sub
  

根据您的要求更改循环。