Hiding all rows that are part of a merged cell

[mummbles74]

I am trying to hide some blank rows in a document betweens a fixed point/template on a sheet and user entered fields on the same sheet. The issue I am having is that column A:A is merged in groups of 3 so when the code runs through the section of the sheet it finds blank cells in column A:A and then hides the complete row, the problem is it only hides the first row of the 3 that are merged. This is my code:

Sub hide_zero_rows()
Dim c As Range
With ActiveSheet.Range("A30:A179")
Do
Set c = .Find("", LookIn:=xlValues, LookAt:=xlWhole, _
MatchCase:=False)
If c Is Nothing Then Exit Do
c.EntireRow.Hidden = True
Loop
End With
End Sub

Thanks in advanced

Mummbles

 

[VoG]

Maybe

c.MergeArea.EntireRow.Hidden = True

 

[mummbles74]

Think thats cracked it thanks for the quick response was driving me crazy.