AccessからEXCELのグラフの操作をしたい

AccessからExcelのシートのデータを参照して
EXCELのグラフを操作しています
グラフのテキストに任意の文字を入れたいのですが
msoTextOrientationHorizontal　で（定数が定義されていません）
とコンパイルエラーになってしまいます

これを回避する方法がありましたらご教授ください

初めてグラフを操作するので困っています

　　　　
　　　'// グラフのデータを設定
　 　ActiveChart.SetSourceData Source:=Sheets("DATA").Range("B1:B7,D1:D7")

'//　グラフテキスト
ActiveChart.ChartTitle.Text = "テスト"

' ///　X数値軸ラベル"
ActiveChart.Axes(xlCategory).AxisTitle.Text = "X数値軸ラベル"


'///　Y数値軸ラベル
ActiveChart.Axes(xlValue).AxisTitle.Text = "Y数値軸ラベル"

' '//グラフ内にテキストボックスの埋め込み
With ActiveChart
With .Shapes.AddTextbox(msoTextOrientationHorizontal, 13, 10, 70, 50)
.TextFrame.Characters.Text = "へのへのもへじ
End With
End With

No.1 ベストアンサー 回答者： keithin 回答日時： 2011/07/01 16:30

とりあえず

変更前：
With .Shapes.AddTextbox(msoTextOrientationHorizontal, 13, 10, 70, 50)

変更後：
With .Shapes.AddTextbox(1, 13, 10, 70, 50)

としてみます。
定数の値（今回は１）は，その定数が使える環境でオブジェクトブラウザで確認することができます。



＃参考
＞（定数が定義されていません）
＞とコンパイルエラーになってしまいます

VBE画面のツールメニューの参照設定で「Microsoft Office XX.0 Object Library」のチェックを入れると，通ります（定数が使える環境になります）。

この回答へのお礼

ありがとうございました

出来ました

お礼日時：2011/07/01 20:35