PowerPoint VBAで選択した図形を削除する

動作検証バージョン：64bit Windows 10 Pro + 32bit PowerPoint（バージョン2005 ビルド12827.20268 Microsoft Store）

「vba パワポ選択したオブジェクト削除」
という検索キーワードで、このサイト『インストラクターのネタ帳』へアクセスがありました。

「選択したオブジェクト」と表現されているのが何なのか、この検索だけでは不明ですが、スライド上に存在する図形（Shapeオブジェクト）でしょうか。

［スポンサードリンク］

選択した図形を削除するサンプルマクロ

プレゼンテーションファイル上でShapeオブジェクトを選択しておいてから、以下のSubプロシージャを実行してください。

Sub 選択されている図形を削除する()
On Error GoTo ErrHandl

　ActiveWindow.Selection.ShapeRange.Delete

Exit Sub
ErrHandl:
　MsgBox "図形を選択してから実行してください。"
End Sub

拙著『いちばんやさしいPowerPoint VBAの教本』の、P.160に「選択されている図形だけを取得したい場合」というワンポイントを書きました。

このワンポイントで、上記のSubプロシージャで利用しているコード

ActiveWindow.Selection.ShapeRange

をご紹介しています。

上記のような

ActiveWindow.Selection.ShapeRange.Delete

というコードで、選択されている図形を削除できます。

図形が選択されていないときには、「ActiveWindow.Selection.ShapeRange」で実行時エラーが発生してしまうので、

On Error GoTo ErrHandl
　…
Exit Sub
ErrHandl:
　MsgBox "図形を選択してから実行してください。"

とエラートラップを入れています。

最終更新日時：2020-06-24 12:13

［スポンサードリンク］

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

Excel VBAユーザーを対象とした、Word VBAの入門書をキンドル本として出しました↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の元になったキンドル本です↓↓

3年前(2021年4月)の
人気記事

「Shapesコレクション・Shapeオブジェクト」の記事一覧