VB宏Excel 2007中隱藏行如果單元格等於零

Question

我想運行在一個表，它是一個表的一部分宏時，它會從A18到J33，第18行是頭。 宏應該隱藏J列單元格中具有零的行。

請幫忙!!!!!!

Answer 1

當您看到您的電子表格命中ALT + F11。這會爲你打開VBE（視覺基本編輯器）。

右鍵單擊VBA Project Explorer（如果你不能看到它，然後單擊視圖 - > Project Explorer或CTRL +[R

插入模塊

複製並粘貼以下代碼

Sub HideRows() 
    Dim cell As Range 
    For Each cell In Range("J19:J33") 
     If Not isEmpty(cell) Then 
      If cell.Value = 0 Then 
       cell.EntireRow.Hidden = True 
      End If 
     End If 
    Next 
End Sub 

Hit F5運行宏。

前

後