ビルド11231.20130)PowerPointで、ドラッグで線を引くときに[Shift]キーを押すのを忘れ、微妙に水平・垂直ではない状態にしてしまうことがあります。それを直すためのマクロを作りましたので、ご紹介しておきます。[スポンサードリンク]斜めの直線を水平にするサンプルマクロ以下のSubプロシージャを実行すると、アクティブなスライドで、水平でない直線があったときに選択され「選択されている線を水平にしますか?"」とメッセージが表示され[はい]をクリックすると、水平になります。Then選択して、メッセージを表示し、[はい]がクリックされたときに、高さを「0」にすることで水平にしています。斜めの直線を垂直にしたい場合は、Shape.Heightプロパティではなく、Widthプロパティを使ってください。Officeの使い方などを紹介し続け(2012年頃からはVBA関連記事が多め)、毎日5万人の方にご覧いただいています。