Word.Document.Shapes.AddLine(100, 420, 500, 420)
怎么把這條線設定成藍色的啊？
uj5u.com熱心網友回復：
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
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/102480.html
標籤：VBA
上一篇：vb 有沒有生成矩陣文字的代碼
下一篇：VB的道路還有多長？