| |
▼じょにー さん：
>線色が、少し青色ぽいのですが、これを黒色にするのはどうすればよいのでしょうか？
2003と2010では生成されるコードが少し異なります。
2007は2010と同じだと思いますが、一方、2003コードは2007,2010でもＯＫ。
2010コードは2003ではエラーになりますので、2003コードを使っておく方が無難かもしれません。
(2003)
With Selection.ShapeRange.Line
.ForeColor.SchemeColor = 8
End With
(2010)
With Selection.ShapeRange.Line
.ForeColor.ObjectThemeColor = msoThemeColorText1
End With
>ActiveSheet.Shapes.AddShape(msoShapeOval, 240.75, 150.75, 72, 72).Select
>のmsoShapeOvalL.T,W.H,72,72←の最後の72,72は何の数値でしょうか？
前レスで申し上げましたとおり、図形の幅、高さ（ポイント値）です。
|
|
UO3
- 11/10/16(日) 12:23 -
