AddLine 方法 - Microsoft Excel Visual Basic 2002 参考

返回介绍

AddLine 方法

发布于 2019-08-07 字数 999 浏览 948 评论 0

当本方法应用于 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

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

支持 Markdown 语法,需要帮助?

目前还没有任何评论,快来抢沙发吧!