아래 코드는 현재 파워포인트 파일의 모든 슬라이드에서 개체의 이름이 '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 ..
워드 검색 결과
해당 글 2건
슬라이드의 특정 이름의 개체 속의 텍스트를 워드 문서로 출력
DOC+VBA
2023. 12. 6. 00:55
엑셀연동 워드문서 일괄생성 (메일머지 기능)
관련: 지식인1, 지식인2, 지식인3 아래내용은 위 링크 1번에서 질문자님의 질문에 대한 지식인 '큰형'님의 소스를 기반으로 수정한 내용입니다. 데이터는 아래와 같은 엑셀문서 양식에 들어 있습니다. 2행에 있는 여러가지 "{항목}" 문자열을 찾아서 워드문서 생성이 O 라면 각 행의 데이터로 바꿔서 아래 워드 문서를 만들어서 지정된 파일명으로 저장하는 일괄처리 작업입니다. 작업을 위해서는 기준이 될 워드문서 내에 {항목}과 같은 표시가 만들어져 있어야 합니다. {항목}은 1개가 아니라 여러군데 있어도 됩니다. 예전 아래한글 프로그램에 있던 메일머지 기능과 유사합니다. 엑셀 데이터를 기반으로 여러장의 워드 문서를 만들 때 유용하겠습니다. 코드는 아래를 참고하세요. 더보기 Option Explicit Sub ..
DOC+VBA
2021. 6. 3. 11:42
최근댓글