Hide rows based on cell value
<p>I have a table of items and quantities, where I want to hide rows when the quantity is 0. The macro works, but it takes too long to complete.</p>

<p>This is the code:</p>

<pre><code>Sub Hide2ndFix()
'
' Hide2ndFix Macro
'
BeginRow = 414
EndRow = 475
ChkCol = 24

    For RowCnt = BeginRow To EndRow
        If Cells(RowCnt, ChkCol).Value = 0 Then
            Cells(RowCnt, ChkCol).EntireRow.Hidden = True
        End If
    Next RowCnt
'
End Sub
</code></pre>

<p>Is there a more efficient way of getting the same result, of hiding rows 414-475 if the value in column X is 0?</p>