Hide rows with 0 value in cell (temporary)

[cripopes]

Hello again gents,

I have a work project which is way over my excell modest skills. I have a large list of products and some have values and some have 0 value for now. To sort out this list for more efficiency I'm looking to temporarily hide those until I need them, eventually with a button or something. Below you have the file.

So if the value in row 'D' is 0 for that column to hide it completely but need an option to unhide them later - a button to hide - unhide will be awesome or any other option for this matter.

Help highly appreciated.

C

 

[My Aswer Is This]

You said:
So if the value in row 'D' is 0

I assume you mean column D
Are you wanting to hide or unhide all of them at once if they have a 0 or just certain rows with 0 in column D

Are these zeros manually entered of the result of a formula?

 

[cripopes]

Yes, all of them at once which D have a zero. And yes, it's a result of a macro.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim newVal As Long, oldVal As Long
    If Target.Column = 2 Then
        'new val
        newVal = Target.Value
        Application.EnableEvents = False
        Application.Undo
         oldVal = Range("D" & Target.Row).Value
        Range("D" & Target.Row).Value = oldVal + newVal
        Target.Value = newVal
        Application.EnableEvents = True
    End If
    If Target.Column = 3 Then
        'new val
        newVal = Target.Value
        Application.EnableEvents = False
        Application.Undo
         oldVal = Range("D" & Target.Row).Value
        Range("D" & Target.Row).Value = oldVal - newVal
        Target.Value = newVal
        Application.EnableEvents = True
    End If
End Sub

 

[cripopes]

Is there a solution to this?