ビルド11231.20130)PowerPointでたくさんの図形を使って図版を作成するときに、図形のサイズを揃える作業が頻発するのは、私だけではないはずです。そのようなときに使えるマクロを作ってみましたので、ご紹介しておきます。複数図形の高さを同じにするPowerPointマクロです。[スポンサードリンク]高さをどう指定するかですが、最初に選択した図形に揃えるという仕様にしました。最初に選択した図形に高さを揃えるサンプルマクロ複数の図形が選択されているときに、以下のSubプロシージャを実行すると、最初に選択した図形と同じ高さになります。.Item(1).Heightの部分です。_ActiveWindow.Selection.ShapeRange.Item(1).Heightです。ShapeRangeはコレクションですが、個々の図形を表すShapeオブジェクトと同じプロパティをかなり持っていて、高さを取得・設定するHeightプロパティも用意されているため、このような書き方ができます。Subを入れています。.Item(1).Widthとしてください。Officeの使い方などを紹介し続け(2012年頃からはVBA関連記事が多め)、毎日5万人の方にご覧いただいています。