09/11/13 01:03:42
>>594
AddShapeの引数を変数にして全体をループさせるだけでいいのでは？
共通パラメータをわざわざ関数にする必要はないと思う。
>あと自分で書いておいてなんですが(MyShape.Name)は何を表すんでしょう？
ShapesのRangeプロパティは、指定したShapeのオブジェクトを返す。
この"指定した"というのが今回の場合はMyShape.Nameとなる。
正直わかりにくいし、Rangeなんて使った事無い。
With ActiveSheet.Shapes(MyShape.Name)
もしくは
With MyShape
このどちらかが一般的だと思ってるがどうだろうか。
>>607
>>595と>>603に続いて同じ失敗をしている。
>>597を参考にして考えればわかる。