Deleting part of a border in VBA

OB1 · #1 (**permalink**) 02-02-12, 06:47

Hi,

I have the following code that adds a border to the top of a cell:

Code:

rngCell.Offset(0, -1).Borders.Item(xlEdgeTop).Weight = xlThick

This work fine but how do I do the complete opposite? I cant use code that deletes all borders as I may have borders on the bottom that I dont want deleting!

Any help would be great

Thanks,

OB1

MikeTheBike · #2 (**permalink**) 02-02-12, 08:19

Hi

You could try this

Code:

rngCell.Offset(0, -1).Borders.Item(xlEdgeTop).LineStyle = xlNone

MTB

OB1 · #3 (**permalink**) 02-02-12, 09:36

Thanks Mike worked a treat

Internet Services

Web Development

Digital Marketing

Consumer Tech