VBA/파워포인트/사진정리 - 0. 개요

맥에서 키노트로 열심히 사진을 정리하던 중, 왜 내가 이 노가다를 하고 있나 하는 자괴감이 생겨 파워포인트에서 자동정렬하는 VBA 코드를 만들었다. 키노트에서는 자동화를 할 수 있는 방법이 없다. MS가 Basic을 개발하고, 그 Basic을 Q-Basic으로, 또 Visual Basic과 VBA로 발전시킨건 더 말할 필요없이 찬사받아야 할 정책이었다. 거기다 공짜, MS의 Basic에 대한 열정은 높이 사줘야 한다.

---

모두 12개의 프로시저를 만들었다. Main_으로 시작하는 두 개의 메인 프로시저와 세 개의 유틸리티, 나머지는 서브 프로시저들이다. 메인은 사진들을 붙여넣는 기능과 사진을 정렬하는 기능으로 나눴다. 사진을 붙여넣고 나서 수동으로 사진을 슬라이드 별로 검토하고 삭제하거나 옮기는 일을 하고, 배치된 사진의 장수에 맞게 정렬하는 작업은 다시 VBA가 자동으로 하게 만든다. 그 뒤 PPT를 키노트에서 불러 수동으로 사진을 크로핑한다. 키노트에서 굳이 작업을 하는 이유는 사진을 크로핑하는 것은 PPT보다 월등해서다.

728x90

메인 프로시저는 리본메뉴에 등록해서 사용한다.

사진을 미리 세팅해둔 폴더에 옮겨놓고 '사진추가'를 하면 슬라이드 당 세 장씩 슬라이드를 추가해가며 삽입한다.

이후 사진을 보면서 가로 방향으로 차이를 두며 배치한다. 가로 위치에 따라 사진의 위치를 자동 정렬하게 하기 위함이다.

대충 가로 위치만 차이를 두게 정리를 한다. 세로 위치는 상관이 없다. 프로그램은 가로 위치에 따라 사진을 정렬한다. 사진을 배치하다 빈 슬라이드가 생겨도 상관없다. 빈 슬라이드는 자동으로 삭제한다.

사진의 가로위치를 다르게 정리한다.

'사진정렬'을 실행하면 슬라이드 당 사진의 장수에 따라 적절히 배치한다.

정렬은 되었지만 주제의 포커스가 맞지 않다.

포커스는 어차피 사진의 주제에 맞도록 맞춰야 하는데 이것은 파워포인트보다 키노트가 월등하다. 그래서 이 슬라이드들을 키노트로 가져가서 최종작업을 한다.

---

VBA/파워포인트/사진정리 - 1. 사진 삽입

VBA/파워포인트/사진정리 - 1. 사진 삽입

VBA/파워포인트/사진정리 - 2. 사진 정열

VBA/파워포인트/사진정리 - 2. 사진 정열

2024.01.13 - [코딩/vba] - VBA/파워포인트/사진정리 - 3. 기타 유틸리티

VBA/파워포인트/사진정리 - 3. 기타 유틸리티