|
三角形の頂点ってなんのことですか
黄色い◇のこといっているのでしょうか?
マクロで記録するとわかりますが・・・
Selection.ShapeRange.Adjustments.Item(1) = 1# ' 右
Selection.ShapeRange.Adjustments.Item(1) = 0# ' 左
Selection.ShapeRange.Adjustments.Item(1) = 0.5 ' 真ん中
' 左端
Cells(1, 1) = Selection.ShapeRange.Left
Cells(1, 2) = Selection.ShapeRange.Top + Selection.ShapeRange.Height
' 右端
Cells(2, 1) = Selection.ShapeRange.Left + Selection.ShapeRange.Width
Cells(2, 2) = Selection.ShapeRange.Top + Selection.ShapeRange.Height
' 上の座標
Cells(3, 2) = Selection.ShapeRange.Top
Cells(3, 1) = Selection.ShapeRange.Left + Selection.ShapeRange.Width _
* Selection.ShapeRange.Adjustments.Item(1)
|
|