ページ内の全ての図形を削除

簡単なのにあったら便利な機能

VBAを初めて触るって方もぜひ使ってみて～

ページ内の全ての図形を選択、削除するサンプルです。
コードは2行！All Deleteって常備しておいても便利ですね。

Deleteについてはこちらもご参照下さい。

Selectについてはこちらもご参照下さい。

SelectAllで全ての図形を選択＆削除

なんでも良いのですが、こんな感じの図形が描いてあったとします。

Sub test9()
    
    'ページ内のすべての図形を選択
    ActiveWindow.SelectAll
    
    
    '削除
    ActiveWindow.Selection.Delete
    
End Sub

SelectAllコマンドで全選択＆削除するサンプルです。

以上です。

え？これだけ？

よく使う方はページの端っこにボタンを用意すると◎