Stu,

In your original you have (Rng.Value = "")
I'm not sure of what you meant by that so I just had the code hide all
rows. Let me know...

If there is some sort of criteria than you'll need to have my code in an
If...then statement.

Dim x as Long
For x = 3 to 2203 step 200
If *something* then
Range(Rows(x),Rows(x + 198)).EntireRow.Hidden = True
End If
Next

--
sb
"Stu" wrote in message
...
To be honest with you Im not sure on how to adjust as needed so im still
a little confused.

---
Stu



------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~ View and post usenet messages directly from http://www.ExcelForum.com/