>>47
ありがとうございます。
すみませんオブジェクトじゃなくてオートシェイプ（図形）でした
数値によって違う位置のラインを引きたいと思ってます。
マクロの記録を使ってそのコードがわかりました。
そのコードを今教えてもらったところに
Call sub_macro　a
などでよろしいでしょうか？