컴퓨터/기타

MS WORD 문서 자동처리의 첫발떼기 -- 템플릿문서(원본문서)를 copy해서 새로운 WORD DOC 파일 만들기

이비그치면 2012. 2. 21. 17:44
문서의 첫페이지는 매크로 실행과 관련된 주의 및 지시사항, 옵션등이 위치하는
페이지로 만들기때문에  2페이지부터가 실제문서가 된다

그래서 제일 먼저 해야 할 작업이 2페이지부터 마지막 페이지까지 COPY해서
새 문서에 붙여넣기(PASTE)하는 작업이다

아래가 code snippet 이다

Documents("C:\test_01.docm").Activate

p1 = 2
   
Set rng = ActiveDocument.Range
Selection.GoTo wdGoToPage, wdGoToAbsolute, p1
rng.Start = Selection.Start
Selection.EndKey Unit:=wdStory

rng.Copy
    
    
sFileName ="outdoc.docx"
Application.Documents.Add.SaveAs FileName:=sFileName
Set NewDoc = Application.Documents.Open(sFileName)
NewDoc.Bookmarks("\EndOfDoc").Range.Paste


위의 코드를 실행해볼수 있는 문서이다

 test_01.docm