Excel公式返回零，但cell.Value = 0返回False

Question

有一個簡單的公式，我試圖隱藏一列公式的行。我想隱藏零或空白的每一行。但是，它不會隱藏公式中具有零的行。我應該改變什麼？這是我的代碼

Sub HideRows2() 
    Dim cell As Range 
    For Each cell In Range("a7:a122") 
      If IsEmpty(cell) Then 
      If cell.Value = 0 Then 
         cell.EntireRow.Hidden = True 
      End If 

     End If 
    Next 
End Sub 

Answer 1

這將隱藏/顯示行而不使用If語句。

cell.EntireRow.Hidden = Int(cell.Value) = 0