エクセルを開いてエクセルに塗りつぶさない赤色楕円を作成するには？

雪だるま  2009-01-28 18:06:23  No: 101527  IP: 192.*.*.*

お世話になります。タイトルそのままの質問です。
エクセルを開いて円は作図できるのですが、塗りつぶされた円になります。
塗りつぶしをしない、赤色の円を作成するにはどのようにするのかおしえてください。

編集 削除
魔界の仮面弁士  2009-01-28 19:58:10  No: 101528  IP: 192.*.*.*

> エクセルを開いて円は作図できるのですが、塗りつぶされた円になります。
現状、それをどのように行っているのかを記述した方が良いかも。
（その方が、具体的な修正コードを提示しやすいので）

> 塗りつぶしをしない、赤色の円を作成するにはどのようにするのかおしえてください。

Excel 2007 VBA で動作確認：

With Sheet1.Shapes.AddShape(msoShapeOval, 100, 100, 50, 50)
    '透明色で塗り潰し
    .Fill.Transparency = 1#

    '赤枠
    .Line.ForeColor.RGB = vbRed
    .Line.Weight = 5#
End With

編集 削除