for i = 1 to 20
if rows(i).OutlineLevel = 1 then
msgbox "row " & i & " at Level 1"
end if
Next

Note that the default is outlinelevel 1, so you would need to restrict your
search to the rows in the outline area.

--
Regards,
Tom Ogilvy


"George" wrote in message
...

Can I select or determine wether a cell is in rowlevel 1?


--
George
------------------------------------------------------------------------
George's Profile: http://www.hightechtalks.com/m830
View this thread: http://www.hightechtalks.com/t2343520