M
Maritza
How do I add a second target Located in a drop down in D4?
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Range("D7"), Target) Is Nothing Then
Range("A29:A47").EntireRow.Hidden = False
If Target.Value = "Refund" Then
Range("a29:a32,A39:A40").EntireRow.Hidden = True
ElseIf Target.Value = "Write off" Then
Range("a33:a46").EntireRow.Hidden = True
Else
Range("A29:a32,a41:a46").EntireRow.Hidden = True
End If
End If
End Sub
-- Thanks in advance!
Maritza
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Range("D7"), Target) Is Nothing Then
Range("A29:A47").EntireRow.Hidden = False
If Target.Value = "Refund" Then
Range("a29:a32,A39:A40").EntireRow.Hidden = True
ElseIf Target.Value = "Write off" Then
Range("a33:a46").EntireRow.Hidden = True
Else
Range("A29:a32,a41:a46").EntireRow.Hidden = True
End If
End If
End Sub
-- Thanks in advance!
Maritza