Hide/Unhide row based on cell value

[TrenchRT]

Hi, I am very new to writing VBA so for many of you this will most likely be a very simple question. I want to hide/unhide rows based on whether or not a cell have a value in it.
If L18 in blank then Row 171 is hided; if L19 is blank then Row 172 is hidden and so on to L168. I have it working for one cell/Row but how do I set it to do this for the range?
Here is what I have:

Please Login or Register  to view this content.

[6StringJazzer]

Welcome to the Forum TrenchRT!

I would do it with a loop. Also, Select Case is overkill here. And if you turn off screen updating, remember to turn it back on.

Please Login or Register  to view this content.

[dmcgov]

this solution will work as well:

Please Login or Register  to view this content.

more code that what 6stringjazzer has but maybe this will work for you better.

so copy this and put it in the sheet code (sheet1, sheet2, etc)

[TrenchRT]

Wow you guys are awesome! And thanks for the welcome.
the solution from 6StringJazzer works but when I run the solution from dmcgov I get

Run-time error "13"
Type mismatch

and debugger highlights on this line

If Not Intersect(keycells, Range(Target.Address)) Then

[6StringJazzer]

when I run the solution from dmcgov I get

Run-time error "13"
Type mismatch

and debugger highlights on this line

If Not Intersect(keycells, Range(Target.Address)) Then

It should be

Please Login or Register  to view this content.

[dmcgov]

it should be

Please Login or Register  to view this content.

[TrenchRT]

Thanks again guys, this is working great!

[6StringJazzer]

Thanks again guys, this is working great!

If your question has been answered please mark your thread as "Solved" so that members will know by looking at the thread title that your problem is solved. Go to the menu immediately above your first post to the thread and click on Thread Tools. From the dropdown menu select "Mark this thread as solved..."

If a member helped you solve your problem, consider adding to their reputation by clicking on the star icon addreputationiconsmall.jpg below their name.

[TrenchRT]

Done, great solution from a great team!