엑셀도구 - 한글 hwp 여러 문서 합치기 병합 매크로 생성

문서들을 병합할 빈 한글 문서를 하나 만든다.

 

 

 

 

메뉴 중 [도구] - [스크립트 매크로] - [매크로 실행] 을 누른다.

 

이미 등록된 매크로 중 사용하지 않는 매크로를 선택 후 왼쪽 아래 펜 모양 버튼을 눌러 이름을 바꿔준다. 여기서는 [중국어2성] 을 편집해 보겠다.

 

(마땅히 사용하지 않는 매크로가 없다면 [매크로 실행] 대신 일단 [매크로 정의]를 통해 빈 곳에 아무 매크로나 만들어 등록한 후 다시 [매크로 실행]으로 들어오면 된다.)

 

 

 

 

원하는 이름으로 변경 후 [설정] 버튼을 누른다.

 

 

 

 

이제 이름을 바꾼 매크로를 선택 후, 오른쪽에 [코드 편집]버튼을 누른다.

 

 

 

 

오른쪽에 [스크립트]라고 무언가 복잡하게 나타나지만 긴장하지 말자.

 

처음 등장하는 중괄호 { 와 마지막 중괄호 } 만 남기고 사이의 부분은 모두 삭제할 것이다. (블럭으로 지정된 부분)

 

 

 

합칠 문서의 역순으로 정의

 

첨부된 엑셀 파일을 실행하여 해당 매크로 복사

 

u0rak_HWP합치기매크로생성_221011.xlsm

0.58MB

 

HAction.GetDefault("InsertFile", HParameterSet.HInsertFile.HSet); with (HParameterSet.HInsertFile) { FileName = "C:\\Temp\\003.hwp"; KeepSection = 1; KeepCharshape = 0; KeepParashape = 0; KeepStyle = 0; } HAction.Execute("InsertFile", HParameterSet.HInsertFile.HSet);
HAction.GetDefault("InsertFile", HParameterSet.HInsertFile.HSet); with (HParameterSet.HInsertFile) { FileName = "C:\\Temp\\002.hwp"; KeepSection = 1; KeepCharshape = 0; KeepParashape = 0; KeepStyle = 0; } HAction.Execute("InsertFile", HParameterSet.HInsertFile.HSet);
HAction.GetDefault("InsertFile", HParameterSet.HInsertFile.HSet); with (HParameterSet.HInsertFile) { FileName = "C:\\Temp\\001.hwp"; KeepSection = 1; KeepCharshape = 0; KeepParashape = 0; KeepStyle = 0; } HAction.Execute("InsertFile", HParameterSet.HInsertFile.HSet);

 

맨 위에 [중국어2성] 이라고 적힌 부분은 아까 지정한 이름과 동일하게 바꾼 후 위에 있는 [매크로 적용] 단추를 눌러 주자. 매크로를 저장하는 역할을 한다.

 

 

 

 

이제 중괄호 사이에 아까 엑셀에서 복사한 명령들을 붙여넣어 주자. 

 

최종 모양은 다음과 같다.

 

 

 

 

완성이다. 위에 있는 [매크로 적용]과 [매크로 실행] 버튼을 차례로 누르면 001.hwp 부터 005.hwp 까지의 문서가 자동으로 병합된다.

 

 

 

 

물론 문서 자체의 크기가 크거나 병합해야 할 문서가 많다면 시간이 꽤 걸릴 수 있다. 혹시 한글이 응답이 없더라도 건드리지 말고 잠시 기다려 주자.

 

출처 : https://lightblog.tistory.com/235