Hi,

I have a piece of code that adds a new line into an XL page that I'm using
as a database.

When the line is added, I want Xl to format it so it looks pretty for the
users, 'cos that's important to them :-)

What I'm struggling with is adding a border to the various cells that have
been added.

The code I am using is:

With Sheets("Identification").Range("a" & rRiskCount & ":n" &
rRiskCount) ' top left justify all cells
.HorizontalAlignment = xlLeft
.VerticalAlignment = xlTop
.Borders.LineStyle = xlContinuous ' add borders
End With

(rRiskCount is defined earlier and returns an integer)

Which works except that it is putting a border around every cell in cloumns
A through N rather than just those in the range defined as A & rRiskCount
through N rRiskCount.

How do I limit the formatting monster?

TIA

Dave