t-hom https://blog.hatena.ne.jp/t-hom/ t-hom’s diary https://thom.hateblo.jp/ VBA こちらの記事に触発されて、ちょっと昔やった別の方法をご紹介。 infoment.hatenablog.com参照元はとても王道的に計算してるんだけど、私のは手抜き。コードはこちら。 Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Sub FakeCircling() Dim sh As Shape Set sh = Sheet1.Shapes.AddShape(msoShapeOval, 100, 50, 10, 10) Dim shadow As Shape: Set shadow = sh.Du… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fthom.hateblo.jp%2Fentry%2F2019%2F01%2F21%2F233209" title="VBA マクロでExcelのシェイプを旋回運動させる - t-hom’s diary" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/t/t-hom/20190121/20190121232743.gif Hatena Blog https://hatena.blog 2019-01-21 23:32:09 rich https://thom.hateblo.jp/entry/2019/01/21/233209 1.0 100%