VBAのグラフの設定について

散布図の設定を線ありにし、かつ終点を矢印にしたいのですが、線はかけるものの、矢印の設定の時、
With Sheet1.ChartObjects("Chart").Chart.SeriesCollection(1)
.Border.LineStyle = xlContinuous '線の種類(連続線)
End With

With sheet1.ChartObjects("Chart").ShapeRange
.Line.EndArrowheadStyle = msoArrowheadOpen
End With

と設定すると、指定された値は境界を超えています。とでます。いくつかの方法でやりましたが、オブジェクトが対象ではないなど、エラーがどうしてもでてしまいます。どのように設定したら良いでしょうか？

No.1 ベストアンサー 回答者： queuerev2 回答日時： 2013/09/18 22:55

当方Excel2007ですが、

With sheet1.ChartObjects("Chart").ShapeRange
.Line.EndArrowheadStyle = msoArrowheadOpen
End With

のかわりに

With Sheet1.ChartObjects("Chart").Chart.SeriesCollection(1)
.Format.Line.EndArrowheadStyle = msoArrowheadOpen
End With

としたらエラーは出ずに散布図の線の終点に矢じりがつきました。

参考URL：http://officetanaka.net/excel/vba/graph/17.htm

この回答へのお礼

エラーがでずに矢印を付けることができました。大変助かりました！ありがとうございます。

お礼日時：2013/09/20 10:12