図形を描くために② 三角関数のグラフを描いてみる。

オートシェイプを関数で描かせるには,注意点がいくらかあるので,自分のためにもメモ。 Option Explicit Sub test() Dim TSlide As Slide: Set TSlide = ActivePresentation.Slides(1) Dim i As Long, y As Long Dim…