21/04/07 15:58:13.17 rJDYR4sC.net
>>273
図形の移動ってこう書くらしいんだけど
Sub TopAndLeftSamp1()
Dim Sh As Shape
For Each Sh In ActiveSheet.Shapes
Sh.Top = Range("B2").Top
Sh.Left = Range("B2").Left
Next Sh
End Sub
それはどう書くんですか？
太い線でもはみ出ないように一番下にくるんですか？
>>272
終わりにだけ、じゃなくて仕切り線を詳細の高さの最後に、はみ出ないようにおきたいということです