Excel VBA オートシェイプを一括削除する方法

通常、オートシェイプを一括削除する場合は以下のように行うが、複数のやり方をメモする。
 
①マウスで図形を一つ選択する。
②ctrl + A で図形を全選択。
③Deleteキーで削除。
 
 
 
その他のやり方
 
●マウスがない時など
①Shift + Ctrl + スペースキー で図形を全選択。
②Deleteキーで削除。
※半角入力状態であること。全角入力状態では、スペースを押しても全選択しない。
 
●ショートカットキーを使用しない
①マウスで図形を一つ選択する。
②ホーム → 編集 → 検索と選択 → ジャンプ をクリックする(F5キーで省略可)。
③セル選択ボタン → 「オブジェクト」を選択 → OK をクリック
すると、そのシートにあるテキストボックスやオートシェイプが全て選択されるので、
④Deleteキーで削除、もしくは、
 編集 → クリア → すべてクリアを選択する。
 
補足: 削除したくないシェイプが含まれている場合
全て選択されている状態で、削除したくないシェイプをShiftキーかCtrlキーを押しながらマウスでクリックし、そのシェイプの選択状態を解除してからクリアすること。