• ベストアンサー

オートシェイプの一括消去

お世話になります。 先日は、QNo.3029500 にて、日報の入力値の一括消去についてお伺いしたところ、アドバイスを頂き感謝しております。 今回は、日報の別シートにて月次報告欄を作っていますが、その中にマクロでオートシェイプを利用した印鑑を押すようにしています。 これを、上記の消去方法で消そうとするとオートシェイプのみ残ってしまうのです。これも一括で消すにはどのようにすればいいのでしょうか?

  • nkeis
  • お礼率57% (86/150)

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

  • ベストアンサー
  • pkh4989
  • ベストアンサー率62% (162/260)
回答No.1

こんにちは。 これで、削除出来ませんか? ActiveSheet.Pictures.Delete

nkeis
質問者

お礼

ありがとうございます。問題解消です。 またよろしくお願いします。

関連するQ&A

  • エクセル:シート上の「オートシェイプ」のみの一括削除について

    お世話になります。過去に同じ質問があればお許しください。 『シート上のオートシェイプ(図形)だけの削除』について、 普通の消去等では残ってしまいます。 シート上のすべてのオートシェイプのみの一括削除の仕方を教えてください。よろしくお願いいたします。

  • エクセルからオートシェイプのみ一括削除するには

    エクセルシートにオートシェイプ(矢印など)を貼り付けたシートを作っていますが、何度もシートをコピペで修正してましたら、このオートシェイプ(矢印など)が、何重にも貼り付けられてしまい、膨大な容量になってしまいました。 ひどいところでは、20重くらいになっており、その矢印自体が1500個くらいありひとつずつ消してると1万個を超えることになり気が遠くなります。 シートの文字や、計算式、書式設定、セル巾などは消さずにオートシェイプのみ一括削除したいのですが、いい方法はありませんか。

  • ExcelVBA オートシェイプについて

    セルの選択した場所のとなりにオートシェイプを移動させるマクロを組みたいと思っています 見かけがまったく同じシートが4枚あり、そのシート全てに同じマクロを指定したいのですが、オートシェイプの名前の指定の仕方が分からなく困っています SelectionChangeイベントでオートシェイプ移動のマクロを動かしているので、同じ名前のボタンならよいのですが・・・ なにかよい方法はないでしょうか?

  • マクロでオートシェイプ以外の図形を消去したい。

    いろいろとマクロを手探りで独学しています。どうしてもわからないので教えてください。 シート上にたくさんの画像が並べてあります。これはマクロを使って挿入・配置されたものです。それを印刷してしまったら、新たにその上から異なる画像を貼り付けていくようにしています。画像は挿入されてきますが、前の画像を消去しなければ、重なってしまうため、消去しなければいけません。ただし、画像を挿入するためのマクロをオートシェイプに登録しているので、これ以外の画像(図)を消去するというマクロが必要です。この消去するマクロも「新しいマクロの登録」で試したのですが、Picture***と画像に名前をつけた状態のものを選択し、消去するというもので、希望のマクロではありません。可能であれば、選択範囲のセルの画像を消去するというマクロが理想です。よろしくお願いいたします。

  • Wordのオートシェイプをまとめて消去する方法

    Wordのファイルにオートシェイプがたくさんありまして、それらをまとめて消去したいのですが、図形描画ツールバーの矢印をクリックしてマウスで範囲していする以外に、マクロでまとめて消す方法はないでしょうか?

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

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

  • オートシェイプ図形の角度をマクロで変えたい

    エクセルのオートシェイプで図形を作って、それをグループ化して、 A1のセルへ数値を入力するとシート1上にあるオートシェイプの角度が変化するようにしたいのです。マクロで出来るでしょうか。 シート上の図形は、Group25 です。 エクセル2000を使用しています。 よろしくお願いします。

  • オートシェイプの削除について

    お分かりになられる方がおりましたら、 是非ご教授下さい。 エクセルで、簡単な矢印付きの表を作成しました。 文字は「数式と値のクリア」で全部を消しますが、 オートシェイプで引いた矢印が残ってしまいます。 1本づつ消しているのですが、量が多い時はとて も大変です。 オートシェイプを一括して消去することはできる のでしょうか。 何卒宜しくお願い申し上げます。

  • 全てのオートシェイプを一括削除する方法はありますか

    Microsoft Excel 2003です。 全てのシートの全てのオートシェイプを一括削除する方法はありますか?

  • オートシェイプの図形の高さ、幅をマクロで変えたい

    エクセルのオートシェイプで図形を作って、それをグループ化して、 A1(縦)A2(横)のセルへ数値を入力するとシート1上にあるオートシェイプの長さと幅が変化するようにしたいのです。マクロで出来るでしょうか。 シート上の図形は、Group25 です。 エクセル2010を使用しています。 よろしくお願いします。

専門家に質問してみよう