Excel表格中的线条设置，如何操作，相信具有基本表格操作的人都会，本文将揭示一下其代码应用如何实现 。
上图所示 ， 包括表格、图形的边框均属于Border对象的设置范围 。
Border对象可以返回如下属性 ， 当然也可以进行设置 。
【VBA编程，Border对象线条属性介绍】总体来说就是对图形的边框线条进行样式设置，如样式，颜色，粗细等等 。
特别是对表格的边框进行设置，可以增加工作表的可视化性能 。
通常来说，一个图形边框作为一个整体来进行设置，当然了，表格边框可以分别对四个边进行设置 。
下图为线条样式可选择项 ， 是一个枚举类型，不需要记?。恍枰凑障嘤χ笛≡窦纯?。
代码：
Private Sub CommandButton1_Click()‘细线边框With Me.Range("B4:D19")With .Borders.Color = RGB(222, 221, 111).LineStyle = 1.Weight = 1End WithEnd WithEnd SubPrivate Sub CommandButton2_Click()’粗线边框With Me.Range("B4:D19")With .Borders.Color = RGB(222, 221, 111).Weight = 4End WithEnd WithEnd SubPrivate Sub CommandButton3_Click()‘虚线边框With Me.Range("B4:D19")With .Borders.Color = RGB(222, 221, 111).LineStyle = 2.LineStyle = 4End WithEnd WithEnd Sub
顺便介绍一下Borders对象，此对象是四个 Border 对象的集合，这些对象代表 Range 对象或 Style 对象的四个边框 。
Worksheets(1).Range("A1").Borders.LineStyle = xlDouble
上述代码为给A1单元格添加双边框，如果只给A1单元格下边框添加双边框，使用下面的代码：
Worksheets(1).Range("A1").Borders(xlEdgeBottom).LineStyle = xlDouble
这里取xlEdgeBottom值就是代码下边框，其它边框设置方式类似 。
欢迎关注、收藏
---END---