슬라이드의 특정 이름의 개체 속의 텍스트를 워드 문서로 출력
아래 코드는 현재 파워포인트 파일의 모든 슬라이드에서 개체의 이름이 'Google shape;'로 시작하는 모든 개체를 찾아 그 안의 텍스트를 같은 이름의 워드 파일에 계속 쭉 출력해주는 예시입니다. 찾을 개체 이름에는 *나 ? 같은 문자를 사용할 수 있습니다. 워드 문서에 출력시 각 슬라이드 번호는 구분을 위해 진한 글씨로 출력합니다. 기본 글자크기는 15입니다. Option Explicit '찾을 도형 이름 'Const TargetShape = "텍스트 개체틀 1*" Const TargetShape = "Google Shape;*" Sub Extract2Docx() 'Dim W As Word.Application, D As Word.Document Dim W As Object, D As Object ..
DOC+VBA
2023. 12. 6. 00:55
최근댓글