Hello,
I have a spreadsheet that I have successfully used VBA to hide rows based on certain criteria in the past. The top two if then statements worked fine. I tried to add the IfElse statement and now, none of it works. Any ideas? Thanks!
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("C4").Value = "Tacoma Office" Then
Rows("34:35").Hidden = False
Else
Rows("34:35").Hidden = True
End If
If Range("C4").Value = "Tacoma" Then
Rows("36:40").Hidden = True
Else
Rows("36:40").Hidden = False
End If
If Range("C4").Value = "Tacoma Office" Then
Rows("61:65").Hidden = True
ElseIf Range("C4").Value = "Spokane Office" Or Range("C4").Value = "Boise Office" Or Range("C4").Value = "Walla Walla Office" Then
Rows("60, 62:65").Hidden = True
ElseIf Range("C4").Value = "Federal Way Office" Then
Rows("60:61, 63:65").Hidden = True
ElseIf Range("C4").Value = "Seattle Office" Then
Rows("60:62, 64:65").Hidden = True
ElseIf Range("C4").Value = "Portland Office" Or Range("C4").Value = "Eugene Office" Then
Rows("60:63, 65").Hidden = True
ElseIf Range("C4").Value = "Anchorage Office" Or Range("C4").Value = "Juneau Office" Then
Rows("60:64").Hidden = True
Else
Rows("61.65").Hidden = False
End If
End Sub
THANKS!
Bookmarks