エクセル2003のマクロについての質問になります。
"B2:D2,B3:F10"を指定範囲として,その中に存在する画像・オートシェイプ及び,
同範囲内のセルに入力されている値を一度に削除するマクロを教えてください。
画像・オートシェイプは指定範囲に一部でも掛かっていれば削除対象にしたいと思っています。
なお,指定範囲には罫線,結合セル,入力規則(プルダウン),マクロ登録オートシェイプ,数式が存在しますが,それらは残したままにしたいと思っています。
(マクロ登録オートシェイプと数式については,残したままにすることは困難に感じるので,無理そうならそれらは除外してお願いします。)
マクロについて初心者ですので,コピーペーストでそのまま使用できる状態で回答頂けると助かりますm(__)m
よろしくお願いします。
No.1ベストアンサー
- 回答日時:
サンプル:
sub macro1()
dim d
for each d in activesheet.drawingobjects
if not application.intersect(range("B2:D2,B3:F10"), range(d.topleftcell, d.bottomrightcell)) is nothing and d.onaction = "" then
d.delete
end if
next
range("B2:D2,B3:F10").specialcells(xlcelltypeconstants).clearcontents
end sub
#詰め込みすぎというか,質問としてあれもこれもと欲張り過ぎ。
ご質問の解決すべき要素を整理して,ひとつずつ検討を深めていくと,もっとよく検討を要する箇所がある事が判ってくると思います。
要望した複数の条件を全て満たした,まさに必要としていた回答そのものでした。
頂いた回答を加工して削除するものがないときのエラー回避とシート保護・解除を加えて使用させて頂きました。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Visual Basic(VBA) 【VBA】Excelの特定範囲のセルを画像で保存したい 2 2023/01/25 13:06
- Visual Basic(VBA) Excelのマクロについて教えてください。 1 2023/03/12 12:16
- Excel(エクセル) エクセルの複写について 4 2022/04/10 01:02
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/04 10:48
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/03/02 08:40
- PowerPoint(パワーポイント) エクセルのマクロについて教えてください。 1 2022/10/03 09:55
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/04 17:58
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 12:30
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/25 16:07
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA コピーを有効行までループ...
-
Excelで連続印刷をするマクロ
-
条件に応じて特定の行を非表示...
-
EXCELで指定範囲に一括し...
-
Excel にて非表示行を探すワー...
-
エクセルでの書式ー下付きショ...
-
yyyy/mm/ddの日付に一括変換す...
-
Excel2007 セルを右方向に削除...
-
Excel(VBA)データ入力に応じて...
-
エクセルで同じ行中にある先頭...
-
wordのvbaでハイパーリンク設定...
-
Excelでセル内の数式は残し値だ...
-
EXCEL:同じセルへどんどん足し...
-
Excelで同じシートのコピーを一...
-
エクセルで前のシートを連続参...
-
EXCELで1ヶ月分の連続した日付...
-
Accessのスプレッドシートエク...
-
別シート参照のセルをシート毎...
-
日報をエクセルで作成したいの...
-
VBAでシートコピー後、シート名...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
条件に応じて特定の行を非表示...
-
Excelでセル内の数式は残し値だ...
-
Excel2007で、太字にした行のみ...
-
Excelで連続印刷をするマクロ
-
「マクロ」の足し算の式を教え...
-
エクセル VBA 小数点を含む数字...
-
エクセルで全ての数字間にカン...
-
(Excel2003)すぐ左の最後の行...
-
Excel(VBA)データ入力に応じて...
-
Excel にて非表示行を探すワー...
-
エクセルで、行ごとの並び替え...
-
エクセル2003でマクロをおこな...
-
excel ある部分だけをコピペし...
-
行の入れ替えってどうするの?
-
Excelで周期的に列を削除する方法
-
整数行を残し小数点の行を削除...
-
EXCEL マクロで「キーワード入...
-
VBA コピーを有効行までループ...
-
Excel2007 セルを右方向に削除...
-
wordのvbaでハイパーリンク設定...
おすすめ情報