エクセルVBAでオブジェクトを一括削除する方法を教えてください

このQ&Aのポイント
  • エクセルVBAを利用してオブジェクトを一括削除する方法を教えてください。
  • どのシートにあるオブジェクトでも一括削除できる方法を教えてください。
  • 詳しい方に教えていただければ幸いです。
回答を見る
  • 締切済み

エクセルVBAについて

どのジャンルで投稿すれば良いか分からなかったのでここに投稿しました。私はエクセルVBAの機能を利用して簡単なソフトを作っているのですが、どうしても分からないことがあるので教えて下さい。あるシートのある範囲内に描かれているオブジェクト(例えば直線123,図123,オートシェイプ123)をすべて選択して一括削除するプログラムが分かりません。詳しい方教えて下さい。

noname#230358
noname#230358
  • 開発
  • 回答数1
  • ありがとう数1

みんなの回答

noname#230359
noname#230359
回答No.1

下記URLが参考になると思います。 http://www2.moug.net/bbs/exvba/20050727000009.htm

参考URL:
http://www2.moug.net/bbs/exvba/20050727000009.htm
noname#230358
質問者

お礼

有難うございました。こんなホームページがあるのには驚きました。いろいろ質問しようと思っています。

関連するQ&A

  • 特定のオートシェイプだけ削除するVBA

    エクセルで一枚のシートに複数のオートシェイプを使用したものがあります。 オートシェイプを使用しているセルの範囲は (A1:L22)と(M1:U22)の二箇所なのですが、 VBAで(A1:L22)の範囲にあるオートシェイプのみ削除する事は可能でしょうか? (A1:L22)内のオートシェイプは作業内容により毎回変わるので 形などは特定できません。 また、オブジェクトの選択で範囲指定をした後削除という方法もあるのですが この削除の作業の前後に他の作業のVBAを使用しているので VBAで削除が出来ればと思います。 よろしくお願いします。

  • セル範囲と図形を指定してVBAで削除するには?

    エクセルで一枚のシートに複数のオートシェイプ(○、△、□)を使用したものがあります。 オートシェイプを使用しているセルの範囲は(A1:G20)と(AP1:AX20)の二箇所なのですが、 VBAで(A1:G20)の範囲にあるオートシェイプ(○のみ)を削除する事はできますか? (A1:G20)の範囲にあるオートシェイプは全体がこのセル範囲に入っています。 手動で、オブジェクトの選択で範囲指定をした後削除という方法もあるのですが この削除の作業の前後に他のVBAを使用しているので、 VBAで削除が出来ればと思います。 いろいろ検索したのですが、セル範囲もしくは図形のいずれかを指定して 削除する方法はあったのですが、両方を指定してのVBAがわかりませんでした。 よろしくお願いいたします。

  • Excelの直線一括削除

    教えてください。 Excelのシートに引き詰められたオートシェイプの直線を一括に削除したいのですが、そんな方法はありますか?

  • エクセル:VBAでシート上のオートシェイプ以外の図形を消去したい。

    お世話になります。 ★VBAでシート上のオートシェイプ以外の図形を消去したいのです。 No.1902175で、エクセルシート上の図形の削除方法をいろいろ教えていただきました。今回は、そのときにはあてはまらなかった、「オートシェイプをのぞく図形をVBAで削除したい」のです。 補足:シートは毎月のある行事等の予定表です。オートシェイプにはマクロを登録しているため消したくありません。その他の図は季節の行事に関するクリップボード等の図で、担当者がシートから毎月手作業で削除していたものです 以上、よろしくお願いいたします。

  • excel/vbaにてオートシェイプに名前の定義づけ

    こんにちは。教えてください。オートシェイプを描きそれに対し名前をつけました。ex)"図"と。それをコピーをすると同じ名前の図形がコピーされます。 同じ名前のついたオートシェイプに対して削除や非表示という操作をしたいです。 書き方を教えてください。 頭の中ではアクティブシートの中に名前が"図"と同じオートシェイプがあれば、そのオブジェクトを削除(非表示もしたい)しなさい。 ていうふうな書き方の感じでいいのでしょうか? VBAを勉強しはじめたばかりです。 教えてください。

  • エクセルVBAの線オブジェクト一括選択法

    エクセル2000VBAの初心者です。よろしくお願いいたします。 QNo.2268830に対するhana-hana3さんの回答にあった参照リンクに、 >●オートシェイプの円形の図だけを選択するには? >アクティブシートのオートシェイプで円形の図だけを選択する例です。 >Sub 円形のオートシェイプを全て選択() > Dim C As Shape > For Each C In ActiveSheet.Shapes >  If C.AutoShapeType = msoShapeOval Then C.Select False > Next C >End Sub がありました。これで、円形(msoShapeOval)や四角形(msoShapeRectangle)はうまく選択することが出来たのですが、オートシェイプで描いた線(AddLineで)を選択することが出来ません。 上記プログラムで、msoShapeOvalをLineに変えたり、いろいろしてみたのですが、分かりません。 どなたがご教授いただければ助かります。

  • EXCEL VBA

    EXCELの指定した範囲(例えばrange("A1:C5"))にある オートシェイプ 図 テキストボックス を選択しグループ化するためには どのようにコードを記述すればいいでしょうか

  • Excel(VBA)

    Excel(VBA)で、指定範囲内にオートシェイプがあるかを判定し、あれば○,なければ×を表示する事は可能でしょうか?

  • エクセルのシートに描いた図を別のシートにコピーしたい。

    いつもお世話になります。 表題の通りなのですが、、1つのエクセルのシートに オートシェイプやら、直線やらを使って、図が描かれています。 それに手直しを入れたいので、別のシートに コピーしようとしたところ出来ませんでした。 形式を選択して貼り付けをすると、 マイクロソフトエクセルのオブジェクトとか出てきてしまって、 いつもの値、数式、書式といったのは出てきません。 うまく説明できておらずすみませんが、 どうしたら今あるシートから、別のシートにコピーできるようになるか教えてください。

  • ExcelのVBAでこんなこと出来ますか?

    Excelのオートシェープで、直線を2本引きます。 その、2本を選択して、ボタンを押すと2本の直線の交点まで、各々の直線が延びるようなマクロって出来るのでしょうか? --        |     | の直線を ----┐        |        |        | このように交点で接続したいのです。 どなたか?わかる人いませんか?宜しくお願い致します。