D
daidipya
I have the following code copy pasted in the "input-assumptions" with
this the macro is running quite well.
Sub HideRows1()
Dim Rng As Range
Set Rng = Sheets("input-assumptions").Range("E88")
If Rng.Value = "Yes" Then
Rows("89:89").EntireRow.Hidden = False
Range("E89").Select
ElseIf Rng.Value = "No" Then
Rows("89:89").EntireRow.Hidden = True
Range("E88").Select
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row <> 88 Then Exit Sub
If Target.Column <> 5 Then Exit Sub
HideRows1
End Sub
i have also another code as follows, which has been copy pasted belwo
the above code
Sub HideRows2()
Dim Rng As Range
Set Rng = Sheets("input-assumptions").Range("E89")
If Rng.Value = "Yes" Then
Rows("90:121").EntireRow.Hidden = False
Range("E89").Select
ElseIf Rng.Value = "No" Then
Rows("90:121").EntireRow.Hidden = True
Range("E89").Select
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row <> 89 Then Exit Sub
If Target.Column <> 5 Then Exit Sub
HideRows2
End Sub
However if i choose "YES" or "NO" in any of the E88 and E89 cells i get
a Complie error and ambigious name detetected: worksheet change
how to run both the macros without having any error
please help me
this the macro is running quite well.
Sub HideRows1()
Dim Rng As Range
Set Rng = Sheets("input-assumptions").Range("E88")
If Rng.Value = "Yes" Then
Rows("89:89").EntireRow.Hidden = False
Range("E89").Select
ElseIf Rng.Value = "No" Then
Rows("89:89").EntireRow.Hidden = True
Range("E88").Select
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row <> 88 Then Exit Sub
If Target.Column <> 5 Then Exit Sub
HideRows1
End Sub
i have also another code as follows, which has been copy pasted belwo
the above code
Sub HideRows2()
Dim Rng As Range
Set Rng = Sheets("input-assumptions").Range("E89")
If Rng.Value = "Yes" Then
Rows("90:121").EntireRow.Hidden = False
Range("E89").Select
ElseIf Rng.Value = "No" Then
Rows("90:121").EntireRow.Hidden = True
Range("E89").Select
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row <> 89 Then Exit Sub
If Target.Column <> 5 Then Exit Sub
HideRows2
End Sub
However if i choose "YES" or "NO" in any of the E88 and E89 cells i get
a Complie error and ambigious name detetected: worksheet change
how to run both the macros without having any error
please help me