Quantcast
Channel: Active questions tagged excel - Stack Overflow
Viewing all articles
Browse latest Browse all 90214

VBA doesnt run when cell value changes

$
0
0

I am trying to get this macro run automatically when a value in the target cell changes but it's not working, searched solutions for hours but am still hitting the wall, sorry I am new to VBA. Really appreciate it if any kind soul could help.

My code is below:

Sub Hide_Row()
Dim rng As Range
Dim cell As Range
Set rng = Sheets("PL").Range("F32:F35,F41:F44,F50:F53,F59:F62")
    For Each cell In rng
        If cell.Value = 0 Then
            cell.EntireRow.Hidden = True
        Else
            cell.EntireRow.Hidden = False
        End If
    Next
Dim MyRange As Range
Set MyRange = Sheets("PL").Range("E30")
        If MyRange.Value = "0" Then
            Sheets("PL").Rows("30:31").EntireRow.Hidden = True
        Else
            Sheets("PL").Rows("30:31").EntireRow.Hidden = False
End If
Set MyRange = Sheets("PL").Range("E39")
        If MyRange.Value = "0" Then
            Sheets("PL").Rows("39:40").EntireRow.Hidden = True
        Else
            Sheets("PL").Rows("39:40").EntireRow.Hidden = False
End If
Set MyRange = Sheets("PL").Range("E48")
        If MyRange.Value = "0" Then
            Sheets("PL").Rows("48:49").EntireRow.Hidden = True
        Else
            Sheets("PL").Rows("48:49").EntireRow.Hidden = False
End If
End Sub

Viewing all articles
Browse latest Browse all 90214

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>