Cell border before page break

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Pygmalion - 09 Jan 2007 08:52 GMT

Hello experts!

Is it somehow possible to tell Excel to put bottom cell border to the
last cell before each page break?

Thanks for the answer.

Regards.

Reply to this Message

Don Guillett - 09 Jan 2007 14:19 GMT

try
Sub dopagebrk()
With ActiveSheet
For i = 1 To .HPageBreaks.Count
.HPageBreaks.Item(i).Location.Borders(xlEdgeBottom).LineStyle =
xlContinuous
Next i
End With
End Sub

Signature

Don Guillett
SalesAid Software
dguillett1@austin.rr.com

> Hello experts!
>
[quoted text clipped - 4 lines]
>
> Regards.

Reply to this Message

Rate this thread: