Здравствуйте:)
Скажите, пожалуйста, а как организовать цикл строчек?
Мне надо бегать по всем строкам и проверять пустая строка или нет, если пустая и сгруппирована, то строку разгруппировывать, иначе ничего не делать.
:)

Вот я попыталась организовать цикл, как вы мне посоветовали, только вот не получается у меня организовать сам поиск в строке........
Sub макрос1()
Dim q As Range
For Each q In Rows
If ............
End If
Exit For
Next
End Sub

Я пока решила просто искать в строках слово "2010", в случае нахождения удалять строку, но не удается написать find, как только находит строчку пустую тут же выходит ошибка "runtime error 91 object variable or With block variable not set"
Sub макроc1()
Dim q As Range
For Each q In Rows
If q.Find("2010") Then
'MsgBox ("найдено")
q.Group
End If
Next q
End Sub

метод find я не так использую что ли?

Спасибо, большое:)

Да, конечно, помогло, спасибо:)

Только жаль, в итоге макрос не пригодился.......:(