Border 对象

多个对象 Border

代表对象的边框。

Border 对象用法

绝大多数具有边框的对象（即除 Range 和 Style 对象外）都将其边框作为单一实体处理，不管该对象具有几个边。整个边框必须作为一个单位来返回。对于此类对象，应当用 Border 属性返回 Border 对象。下例激活名为 Chart1 的图表工作表，将活动图表的图表区边框置为虚线边框，而将绘图区边框置为点线边框。

Charts("chart1").Activate
With ActiveChart
    .ChartArea.Border.LineStyle = xlDash
    .PlotArea.Border.LineStyle = xlDot
End With

Range 和 Style 对象具有四个分立的边框：左边框、右边框、顶部边框和底部边框，这四个边框既可单独返回，也可作为一个组同时返回。可用 Borders 属性返回 Borders 集合，该集合包含所有四个边框，并将这些边框作为一个单位。下例向第一张工作表上的单元格 A1 添加双边框。

Worksheets(1).Range("A1").Borders.LineStyle = xlDouble

可用 Borders(index)（其中 index 指定要返回的边框）返回单个 Border 对象。下例设置单元格区域 A1:G1 的底部边框的颜色。

Worksheets("Sheet1").Range("A1:G1"). _
    Borders(xlEdgeBottom).Color = RGB(255, 0, 0)

Index 可为以下 XlBordersIndex 常量之一：xlDiagonalDown、xlDiagonalUp、xlEdgeBottom、xlEdgeLeft、xlEdgeRight、xlEdgeTop、xlInsideHorizontal 或 xlInsideVertical。