Running A Macro for Specific Rows Only

[TJC86]

Hi,

I'm sure this is really simple but I can't figure it out for the life of me. I have the following Macro:

Sub UnhideRow1()
Dim i As Long
If columns("A").SpecialCells(xlCellTypeVisible).Count = rows.Count Then Exit Sub
i = 1
Do Until rows(i).Hidden = True
i = i + 1
Loop
rows(i).Hidden = False
End Sub


It works okay, but I only want it to work for rows 50:77 as I have hidden rows after that which I don't want to unhide.

How can I limit the macro to run just for these rows. I've been all over Google and can't get it to work.

Thank you!!

 

[TJC86]

That works perfectly, thank you!

You've done in 2 minutes what has taken me 4 hours to get nowhere with. Amazing.

My hero.

 

[achilles18]

Okay, give this macro a try...

Sub ShowFirstHiddenRow()
  If Rows(50).Hidden Then
    Rows(50).Hidden = False
  Else
    On Error Resume Next
    With Range("A49:A77").SpecialCells(xlVisible)
      .Areas(1)(.Areas(1).Count).Offset(1).EntireRow.Hidden = False
    End With
    On Error GoTo 0
  End If
End Sub

Hey sorry to drag up an old thread. Your code is awesome and works perfectly! I was wondering is there a way to un-hide two rows at a time using this same method?

*First time posting so not sure if this is the right thing to do or not*

Thanks

 

[Rick Rothstein]

Hey sorry to drag up an old thread. Your code is awesome and works perfectly! I was wondering is there a way to un-hide two rows at a time using this same method?

*First time posting so not sure if this is the right thing to do or not*

Your question is not really a follow-up to the one that started this thread, so I think starting a new thread with your question will give you the widest audience of volunteers to help answer it. When you do post your new thread, be sure to explain fully what you want... I am not exactly sure what you are after when you say "unhide two rows at a time"... at what time? Remember when you post your question, the people you are seeking help from know absolutely nothing about you data, how it is laid out, what you want to do with it, what results you expect to get from whatever solutions we give you or where you want those solutions to go to or appear at... you have to make sure your question provides enough details so that we don't have to guess at any of those items I just listed. Screenshots help (see my signature line for one way to provide them).

 

[achilles18]

Your question is not really a follow-up to the one that started this thread, so I think starting a new thread with your question will give you the widest audience of volunteers to help answer it. When you do post your new thread, be sure to explain fully what you want... I am not exactly sure what you are after when you say "unhide two rows at a time"... at what time? Remember when you post your question, the people you are seeking help from know absolutely nothing about you data, how it is laid out, what you want to do with it, what results you expect to get from whatever solutions we give you or where you want those solutions to go to or appear at... you have to make sure your question provides enough details so that we don't have to guess at any of those items I just listed. Screenshots help (see my signature line for one way to provide them).

Hey thanks for your response! Yeah will try to provide as much info as I can in the future my apologies for that.

I'm not very proficient with VBA so I do apologise if the terms I use to describe functions are incorrect. With the solution you provided it goes through and just un-hides the next row that is hidden. So per your example it starts at 50 and says if 50 is hidden then unhide it else go to 51 and so on. This is only Un-Hiding one row at a time. I would like to know if it is possible to un-hide two rows at a time. So starting at 50 per your example again if 50 is hidden unhide 50+51.

Does that make sense?

Thanks again for responding!

Regards