怎样在excel中用VBA画分区间的函数图线

怎样在excel中用VBA画分区间的函数图线

AddLine 方法

当本方法应用于 Shapes 对象时，返回一个 Shape 对象，该对象代表工作表中的新线条。当本方法应用于 CanvasShapes 对象时，返回一个 Shape 对象，该对象代表绘图画布中的新线条。

语法：
expression.AddLine(BeginX, Beginy, EndX, EndY)
其中：
expression 必选。该表达式返回 Shapes 对象。
BeginX, BeginY Single 类型，必需。相对于文档的左上角，以磅为单位给出线条的起点位置。
EndX, EndY Single 类型，必需。相对于文档的左上角，以磅为单位给出线条的终点位置。

示例：
本示例向 myDocument 中添加蓝色的虚线。

Set myDocument = Worksheets(1)
With myDocument.Shapes.AddLine(10, 10, 250, 250).Line
.DashStyle = msoLineDashDotDot
.ForeColor.RGB = RGB(50, 0, 128)
End With