for each의 경고
VBA 에서슬라이드(1) 내에서 모든 Shape 을 삭제한다고 할 때 for each를 써서 아래와 같이 해봅시다.dim shp as Shapefor each shp in ActivePresentation.Slides(1).Shapesshp.deletenext shp실행해보면 다 사라질까요?안타깝게도 의도와 달리 모두다 사라지지 않습니다.절반 정도만 사라집니다.왜 그럴까요? 첨부한 PPTM 을 매크로를 허용하고 열어봅시다.'살펴보기' 화살표를 누릅니다. 도형추가를 눌러 랜덤한 위치에 도형을 10개 만들었습니다. 그다음 도형삭제(for each를 사용)을 클릭하여 도형을 삭제해봅시다.내부적으로 아래 소스대로 작동합니다. Dim shp As Shape For Each shp In ActivePresentat..
VBA Tipz
2017. 1. 12. 20:34
최근댓글