Q:我怎样使用VBA代码在两个单元格之间绘制一条直线?一个单元格命名为“start”,另一个单元格命名为“stop”,我想绘制一条红色的直线连接它们。如下图1所示。
?
图1
A:很简单的代码。...ActiveSheet.Shapes.AddLine(l1, l2, r1,r2).Line
.ForeColor.RGB = RGB(255, 0, 0)
End With
End Sub
如果直线的起点在单元格...ActiveSheet.Shapes.AddLine(l1, l2, r1,r2).Line
.ForeColor.RGB = RGB(255, 0, 0)
End With
End Sub
如果直线的起点在单元格