Home » パワーポイントマクロ・PowerPoint VBAの使い方 » 画像 » 画像だけをすべて選択するPowerPointマクロ

画像だけをすべて選択するPowerPointマクロ

対象：PowerPoint2007, PowerPoint2010, PowerPoint2013

「vba パワーポイント ピクチャ すべて選択」
という検索で、このサイト・インストラクターのネタ帳へのアクセスがあることに気づきました。

ピクチャ（画像）だけを、すべて選択するPowerPointのマクロ・VBA（Visual Basic for Applications）のコードを探している方による検索です。

［スポンサードリンク］

アクティブスライドの画像だけを選択するサンプルマクロ

以下のようなマクロで、アクティブなスライド上にある、画像だけをすべて選択することができます。

Sub アクティブスライドの画像だけを選択する()
　Dim shp As Shape

　With ActiveWindow.Selection
　　.Unselect
　　For Each shp In .SlideRange.Shapes
　　　If shp.Type = msoPicture Then
　　　　　shp.Select Replace:=msoFalse
　　　End If
　　Next shp　
　End With
End Sub

サンプルマクロの解説

画像だけが選択された状態にするために、まずは、現在の選択状態を解除しておきます。
　With ActiveWindow.Selection
　　.Unselect

その後、アクティブスライド上の全Shapeに対してループを回して、
　　For Each shp In .SlideRange.Shapes

その図形が画像だったときに、
　　　If shp.Type = msoPicture Then

その図形（画像）を選択しています。
　　　　　shp.Select Replace:=msoFalse

ShapeオブジェクトのSelectメソッドの引数・ReplaceにmsoFalseを指定することで、既に選択されている図形の選択を解除しないで、追加で選択するようにしています。

▼『いちばんやさしい PowerPoint VBA の教本』は、一番易しいパワポマクロ入門書、というわけではありませんので、ご注意ください。
いちばんやさしいPowerPoint VBAの教本
［スポンサードリンク］

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » 画像 » 画像だけをすべて選択するPowerPointマクロ

『インストラクターのネタ帳』では、2003年10月からMicrosoft Officeの使い方などを紹介し続けています。
日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓ 上記の『Excel VBAユーザーのためのPythonプログラミング』の、元になったキンドル本です↓↓ 『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓ PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓ 数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓ 小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓ Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓ Excel VBAの経験がある方を対象に、Word VBAの基本をキンドル本としてまとめました↓↓ Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓ 図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓ グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓ Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓


「画像」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.