Thread: Unhiding rows
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Ashlie Ashlie is offline
external usenet poster
 
Posts: 3
Default Unhiding rows

Hi,

I am very, very new to macros so please forgive me. I am trying to unhide
rows when the word "Yes" is selected in a cell. I have found (and modified
the following macro) from another post, which works great:

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("c14").Text = "Yes" Then Rows("15:16").EntireRow.Hidden = False
If Range("c14").Text = "" Then Rows("15:16").EntireRow.Hidden = True
End Sub

My problem is, I need this to work for the following as well:

if c17 is yes, unhide 18:19
if c20 is yes, unhide 21:22
if c23 is yes, unhide 24:25

I tried copying and pasting the first macro and modifying it for each
scenario but I get an error message (something about the Private Sub).

Any help would be greatly appreciated! :)