No.1
Excel中画线条是一个很简单的操作，其中线条分几种不同的类型，如线条端点形状也分不同的几种类型。
下面具体介绍一下，如何利用vba代码进行设置线条的一些方法。
vba代码画线用到一个对象：LineFormat
下图为LineFormat属性：
属性看上去较多，但大多有一定的规则，使用起来还是比较容易理解的。
下面是一些用到的枚举，有端点样式枚举、线条类型枚举、箭头长度枚举。
适当选择不同的枚举类型，可以获得不同的线条样式，这些都是Excel自定义好的东西，只要用拿来主义进行选择使用即可，无需我们进行任何思考。
No.2
下面是一个例子，对应不同的值画一条线段。
有美术基础的你，可以发挥自己的想象，画出任意线条。
可以看到上图的线条是最终结果。
下图为相应的代码：
其中
Dim l As LineFormat
Set l = ThisWorkbook.ActiveSheet.Shapes.AddLine(lX, lY, rX, rY).Line
利用两行代码画出线段。lX, lY, rX, rY是四个变量，分别代表线段的左右位置。
画出线段后要对它进行属性赋值。
With l
.Transparency = 0.5'明暗度
.ForeColor.RGB = RGB(211, 32, 21)'前景色
.BeginArrowheadLength = msoArrowheadLong '起始长度
.BeginArrowheadStyle = r.Offset(0, 7).Value '起始端点形状
.EndArrowheadLength = msoArrowheadLengthMedium '结束长度
.EndArrowheadStyle = msoArrowheadStealth'结束端点形状 无
End With
当然还有其它一些属性没有设置，如Weight宽度，Pattern填充图案等。可以自己设置。
总得来说，线条有比较多属性设置，在学习和使用过程中根据不同的需求进行相应的参数设置。
特别是在做流程图的时候，用到比较多，一个美观的流程还是十分必要的。
欢迎关注、收藏
