Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

63738 / 76738

←次へ　｜　前へ→


	【17594】図形描画

かっちゃん

- 04/9/3(金) 6:17 -


	引用なし

	パスワード

　いつも利用させていただいています。適切なアドバイスありがとうございます。

　今回は「図形描画」の件で質問させていただきます。
シート上で、直線を引いたりそれを消したりしていると、その直線は「直線９６」とか｢直線１０２」とかになっています。シート上に2本しかないのに、これまでの履歴が残っているのです。今は
　For J = 50 To 200
　　DelLine = "Line " & J
　　ActiveSheet.Shapes(DelLine).Select
　　Selection.Delete
　Next J
で消していますが、使用するにつれてFor分の範囲を大きくしなければなりません。
それで、
　１　現在使用している直線の番号（直線９６であれば９６のこと）がわかる方法。
　２　直線を引くとき、番号が１（または０）から始まるように、リセットする方法。
　３　または、もっと良い方法
が、ありましたらお教えください。
よろしくお願いいたします。

0 hits

▼

【17594】図形描画 かっちゃん 04/9/3(金) 6:17

≪