Hide Rows Macro Closed

Question

Dear Sir 

i have some Record in Sheet1 

Parts Name
Parts Used in Section
parts Used Quantity

if my parts used Quantity is 0 then Row will Hide 
i want Macro for this Function Becuase i have lot of data and
i want print only Exits Value in Parts Used Quantity

TrowaD · Answer

Hi Akram786,

You didn't tell us what column you use for qty, I assumed column C:
Sub RunMe()
Dim lRow As Integer

lRow = Range("C" & Rows.Count).End(xlUp).Row

For Each cell In Range("C1:C" & lRow)
    If cell.Value = 0 Then cell.EntireRow.Hidden = True
Next cell
End Sub

And to show hidden rows again:
Sub Undo()
Cells.EntireRow.Hidden = False
End Sub


Best regards,
Trowa

Hide Rows Macro

1 response

Similar discussions

Subscribe To Our Newsletter!