Tom, Please ignore my previous post. The error was due to incorrect
spelling. Thanks for your help.

Gary, Thank you as well for your time. Its greatly appreciated.

Regards,
Mark

"Tom Ogilvy" wrote:

> Dim rng as Range
> set rng = Range("PriorPTT")
> set rng = rng.rows(rng.rows.count)
> rng.EntireRow.Insert
>
> --
> Regards,
> Tom Ogilvy
>
>
>
> "Mark Williams" <MarkWilliams@discussions.microsoft.com> wrote in message
> news:C7CA84BF-D7D4-4558-94AA-39E1292A87EE@microsoft.com...
> > Hi All,
> >
> > I am trying to write a macro that will insert a row above a blank row in a
> > range I've named "PriorPTI". The blank row is the last row in a range that
> > contains 12 rows. The range will grow as I insert more rows. I am not a
> > programmer so any help will be greatly appreciated as I've spent two work
> > days trying to figure this out (Yes: it is rocket science :-)).
> >
> > Regards,
> > Mark
> >
>
>
>