選択されたオブジェクトがGroupobjectか判定」という検索キーワードに気付きました。VBAで選択されている描画オブジェクト(図形)が、グループ化されているかどうかを判定するには、どうすればいいのかを探していらしたのでしょう。[スポンサードリンク]Shape.Type等がmsoGroupのときにグループ化されている図形がグループ化されているかどうかは、ShapeオブジェクトやShapeRangeオブジェクトのTypeプロパティで判定できます。グループ化されているときにShapeやShapeRangeのTypeプロパティが、Office.MsoShapeType列挙に定義されている定数msoGroupを返すかを調べることで、グループ化された図形かどうかを判定できます。グループ化図形を目立たせるExcelマクログループ化されたオートシェイプ・図形をすべてグループ解除するExcelマクロ選択図形がグループ化されているかを判定するサンプルマクロ選択図形がグループ化されているかを判定するには、以下のSubプロシージャが参考になるでしょう。"グループ化されています。"図形を1つだけ選択して実行してください。"グループ化されていません。"図形を選択してから実行してください。VBAのSelectionプロパティは、図形が選択されているときにはOvalやRectangleなどの、レガシーな固有のオブジェクトを返します。そこで「Selection.ShapeRange」というオブジェクト式で、ShapeRangeオブジェクトを取得しています。Selection.ShapeRange.TypemsoGroupだったときにグループ化されている旨のメッセージを表示しています。"グループ化されています。図形を1つだけ選択して実行するよう促すメッセージを表示しています。"図形を1つだけ選択して実行してください。"図形を選択してから実行してください。"とエラートラップを行っています。オブジェクト式解説編』を開催します。インストラクターのネタ帳Shape.VisibleプロパティにmsoFalseを設定することで、グループ化図形を非表示にする、Excelマクロをご紹介しています。Officeの使い方などを紹介し続け(2012年頃からはVBA関連記事が多め)、毎日5万人の方にご覧いただいています。