Hi Pete,

I remember having the same problem and this sorted it.

Sub Test

Range("DCard1:Dcard1a").Borders.Linestyle = xlContinuous

End Sub

This means that you don't even have to select the range prior t
applying borders.

Regards

Seamu

--
Message posted from http://www.ExcelForum.com