• ベストアンサー

excelで図形をマクロで消すのには

excelでマクロを使用して 条件に合わせて図形をコピーして 帳票に貼り付けています。 そこで、次の帳票を作ろうとしたときに 先ほどコピーした図形を削除したいのですが マクロで削除する方法はありませんでしょうか? コピー~貼り付けなので毎回、名前が変わってしまうので 名称を指定して削除ができません。 なにかいい方法をお教えくださいませ。

質問者が選んだベストアンサー

  • ベストアンサー
  • maruru01
  • ベストアンサー率51% (1179/2272)
回答No.1

こんにちは。maruru01です。 あるシート上の全ての図形を削除するなら、こんな感じ Private Sub DeleteShapes()   Dim delShape As Shape   For Each delShape In Worksheets("Sheet1").Shapes     delShape.Delete   Next delShape End Sub

a00000a
質問者

お礼

おそくなりました できました。 ありがとーございました。

その他の回答 (1)

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.2

最近下記で上手く行かないケースも経験していますが、 取りあえず、やって見てください。上手く行きませんか。シート上の少数のシェイプ等では一括消去テスト済み。 Sub test01() ActiveSheet.DrawingObjects.Delete End Sub

a00000a
質問者

お礼

たすかりました。 ありがとうございました

関連するQ&A

  • excelでマクロで図形をコピー、張り付ける

    Excelの画面で 挿入→図形で 作成した図形をマクロを使って コピーし、任意の箇所に張り付けたいのですが、図形が認識されないのか マクロが動作しません。どうしたらできるでしょうか?

  • エクセル97での画像名称について

    エクセル97での画像名称について教えてください。 エクセルのワークシート上で四角形や楕円などの図形を描くと 例えば四角形は"Rectangle 6",楕円は"Oval 4"などのように 自動的にエクセル内部で図形に名前がつき、マクロでその図形に対して その名前を指定する事で処理が可能になると思うのですが、 自動的に名前がつく"Rectangle 6"等の名前はエクセル上で確認するは できないのでしょうか? 今は、「マクロを記録する」で図形を指定などして、図形の名前を確認しています。もっと簡単に確認する方法はないですか? また、図形の名前を指定して(例えば自分で"Mycircle"等の名前を決めて) 図形を描く事は可能なのでしょうか? 宜しくお願い致します。

  • エクセルのマクロについて教えて下さい

    エクセルで、データ(書類)のコピー貼り付けのマクロを組みました。 ツール→マクロで、新しいマクロの記録から、実際にコピーをして貼り付けをし、記録の終了をしました。 次に他のセルの場所でもそのマクロを実行して、何度も場所を変えてコピー貼り付けを実行したいのですが、操作用のボタンを作成して貼り付け、ボタンを押すと、同じ場所でコピー貼り付けを繰り返します。 たしか絶対参照とか相対参照とかあったような気がするのですが…。 どうすれば、他の場所でもボタンを押すだけでコピー貼り付けのマクロを実行できるようになりますか? よろしくお願いします。

  • エクセル図形間のテキストのコピー方法は?

     エクセル97のマクロの記述の質問です。  Sheet1とSeet2にそれぞれ図形があり、Sheet1の図形上のテキストをSheet2の図形にコピーしたいのですが、どう記述すればよいでしょうか?  図形をオブジェクトとして指定するのかと漠然と思うのですが、特定の図形のオブジェクトの名前をどうやって知(取得す)ればいいのかも、判りません。  よろしくご指導願います。

  • エクセルマクロについて教えて

    マクロか関数かわかりませんがよく番号を入力すると(例)名前や商品名がでてきますがそれを作りたいのですがなかなかわかりません。マクロで自動記録でコピーして貼り付けでもいいかなと思い試したのですが貼り付けは列と行を指定しないと駄目?できませんでした。 アドバイスお願い致します。

  • エクセルの図形をワードに貼り付けがうまくいかない

    エクセルの図形をワードに貼り付ける方法ですが、エクセルで図形選択・コピーしてワード上で貼り付けるのですが、図形内の文字の大きさが変わり文字が全部、表示できません。コピー・貼り付けやワード上で図形を縮小しても図形と文字の大きさの比が変わらないやり方があるのでしょうか。(エクセル、ワードとも97です) よろしくお願いします。

  • エクセルマクロを使って図形を等間隔に複数コピー

    エクセルマクロを使って次のようなことをしたいのですがいかがでしょうか。過去問を調べていますが、コレという事例に出会えません。何卒よろしくお願いします。 複数の図形がシート上に描かれているとします。 このうちの1つの図形を選択し、その位置を基点として水平方向あるいは垂直方向に指定数だけ等間隔にコピーしたいというものです。 このとき、 (1)「コピーする図形を選んでください」とメッセージを出してマウスで選ぶ。 (2)「コピーする数を入力してください」とメッセージを出して数を入力する。 (3)「配置する間隔を入力してください」とメッセージを出して数値を入力する。 というような対話式にしたいのです。 実際の操作を記録して、それをもとにプログラムしてみても、水平方向にいかず斜めになったりしてわけがわかりません。また(1)の方法が全くわかりません(こんなのはできないのですかね)。 プログラム例を御紹介頂きたくよろしくお願い申し上げます。 ※(1)が無理ならば、あらかじめ対象の図形を選んでおいてからプログラムを実行するというのでも結構です。

  • エクセルのマクロ

    素人なのですみませんが教えてください エクセルのマクロを使用して エクセルを起動して ウィンドウズ内のあるフォルダ内のエクセルファイルをコピーをして違うフォルダに貼り付けをしたいのですが、どのようにマクロを組み込むのか教えてください(マクロの式) (例)エクセル起動後エクセルのマクロにて c\Aフォルダ\aファイル←コピー c\Bフォルダ\aファイル←貼り付け

  • エクセル マクロで可能!?

    エクセルで個人データを管理しています。マクロでできるのかわかりませんが、できるなら挑戦してみようと思い質問しました。 データは、縦に個人別に並べてあります。また1人のデータにつき4行を使って横長にその個人のデータを記入しています。よって左端に名前等の基本データが記入されていています。下のような感じです。 (シート1)  名前A データ ××○○○・・・・・・  名前B データ ×○○×○・・・・・・  名前C データ ○○××○・・・・・・   ・   ・ そこで、ある個人のデータの名前周辺部分を別シートにそのまま同じ形式でコピーをしたいのですが、それをマクロでできないのかなと思い質問しました。下のように全ての人をコピーする必要がないので解らなくなっています。 (シート2)  名前A   名前C  名前G   ・   ・ 考えているのはシート1の各名前の前にコマンドボタンを配置し、それに『指定部分をコピーしてシート2に貼り付け』というマクロを組めばいいのでないかと思っています。しかし、全ての個人をコピーする必要がないため、コピー先の場所をどう指定してやればいいのかがわかりません。コピーをした順番に上から順番に埋まってほしいのです。 以上、どなたかわかる方お願いします。 エクセルを文章で状況説明するのは難しいです…

  • Excelマクロの削除

    Excelにて別のExcelのデータをコピーし、名前を付けて保存するマクロを作成しております。 その際、新しく作成したファイルにマクロが残ってしまいます。そのファイルにマクロを残さない方法はありますか? またそのマクロをツール→マクロ→削除をしても次回、ファイルを開いたときに、マクロの有効無効を聞かれます。 他にマクロを削除する場所があるのでしょうか? よろしくお願いします。

専門家に質問してみよう