t-hom https://blog.hatena.ne.jp/t-hom/ t-hom’s diary https://thom.hateblo.jp/ VBA VBAの研究・考察 こちらのブログで、PowerPoint VBAでFor Eachを使ってShapeを消すとうまくいかないという問題が紹介されていた。chemiphys.hateblo.jpやってみたところ、実際に1つ飛ばしで削除される。 実際に検証 Excelで検証してみた。 Sub Excel版ShapeAdd() Dim i As Long For i = 10 To 200 Step 10 Sheets(1).Shapes.AddShape _ msoShapeRectangle, i, i, 100, 50 Next End Sub Sub Excel版ShapeDelete() Dim s As S… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fthom.hateblo.jp%2Fentry%2F2017%2F01%2F01%2F104513" title="VBA PowerPointでShapeを一気に削除するマクロ - 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/20170101/20170101090907.png Hatena Blog https://hatena.blog 2017-01-01 10:45:13 rich https://thom.hateblo.jp/entry/2017/01/01/104513 1.0 100%