[[20031124013432]]　『座標軸に名前をいれるVBAコマンドは』（ウメキヌ）　ページの最後に飛ぶ

『座標軸に名前をいれるVBAコマンドは』（ウメキヌ）

座標軸の名前をいれるVBAコマンドを教えてください。

　　Sub Line()

       Activesheet.Shapes.AddLine(100,200.100,10).select
       Locate 80,10:Print "Y"
    End sub

　　縦軸の名前をYと表示したいプログラムです。しかし、VBAでは、
　Locateはサポートされていませんので、実行するとエラーがでます。
　　LocateにかわるVBAコマンドを教えてください。テキストボックス

  など使わず表示したいのです。よろしくお願いします。

 今ひとつ、座標軸という意味がわかりませんが、

 AddLineで引いた直線にテキストを追加するのは無理でしょう。

 変わりに四角形を描いてそれにテキストを追加する、くらいでしょうか？

 （kazu）

 こちら事務局です。
 同じ内容の[書き込み]なので、こちらに統合しました。
 [初めての方へ]の[既存の書き込みに書き込む]↓を一度読んでください。
http://www.excel.studio-kazu.jp/wiki/excelboard/index.html#kizon
 （kazu）

『再び。座標軸の名前をいれるVBAコマンドを教えてください。』（ウメキヌ）

　説明不足でした。

　　Sub Line()

       Activesheet.Shapes.AddLine(100,200,100,10).select　　’縦軸
　　　 Activesheet.Shapes.AddLine(100,200,360,200).select 　’横軸
       Locate 80,10:Print "Y"
       Locate 350,210:Print "x"

　　　　y=xのプログラムは省略

    End sub

　y=xをグラフで作図するため、縦軸と横軸の名前をYとXと表示
したいプログラムです。しかし、VBAでは、Locateはサポートさ
れていませんので、実行するとエラーがでます。Locateにかわる
VBAコマンドを教えてください。
　実行後、手操作で作図するのでは面白くなく、またテキスト
ボックスを使ったプログラムでは表示できますが、大げさすぎます
ので、簡単に表示したいのです。よろしくお願いします。

コメント返信：

[ 一覧(最新更新順) ]

[[20031124013432]] 『座標軸に名前をいれるVBAコマンドは』（ウメキヌ） ページの最後に飛ぶ

[[20031124013432]]　『座標軸に名前をいれるVBAコマンドは』（ウメキヌ）　ページの最後に飛ぶ