vba在word光标处插入shape.AddLine

在VBA（Visual Basic for Applications）中，当你想要在Microsoft Word文档中插入形状（如直线、矩形等），你可以使用 `Shape.AddLine` 方法。这个方法用于在当前Word文档中的指定位置创建一个新的线形图形。在VBA环境下，你首先需要定位到你想插入形状的光标位置，例如：

Dim rng As Range ' 定义一个范围变量来保存光标位置
Set rng = Selection ' 使用Selection获取当前文档选区（即光标位置）

' 创建新形状并使其起点与光标位置相对应
Dim shp As Shape
Set shp = ActiveDocument.Shapes.AddLine(xlEdgeBottom, rng.Left, rng.Bottom) ' x轴底部对齐，y轴从光标的左下角开始

这里的 `xlEdgeBottom` 指定了线条的起始点是相对于页面底边，`rng.Left` 和 `rng.Bottom` 分别表示水平和垂直方向上光标的坐标值。然后 `shp` 对象就被添加到了文档中。

如果你想了解更多关于VBA在Word操作中的细节，可以询问关于如何定位特定位置、如何处理形状属性或者更复杂的布局等问题。