기존에 작성된 Word 문서에서 특정 페이지의 줄로 위치를 이동하는 예제를 만들었다. 문서를 수정하고 스타일을 덮어씌울려면 임의 위치로 이동하는 방법이 요긴할 것이다. 문서의 특정 페이지와 줄로 커서를 이동하고 등록된 스타일 적용하는 예제 Sub OpenWordDocment() Dim WordApp As New Word.Application ' Word 문서를 객체로 설정 WordApp.Visible = True 'New Apps will be hidden by default, so make visible ' 신규 문서 추가 Dim WordDoc As New Word.Document Set WordDoc = WordApp.Documents.Open("C:\WORKS\WORD MACRO\AMEM.DOCX"..
[Excel VBA] MS WORD 자동화 (4) - WORD STYLE 스타일 지정
MS Word 에 스타일을 지정하여, 글자를 추가하는 예제를 만들어보았다. ○ 스타일을 등록하지 않고 사용하는 방법 ○ 기존에 등록된 스타일을 이용하는 방법 스타일을 등록하지 않고 사용하는 방법 Ms Word 에 문서를 추가하고 글씨를 쓰는 예제 (WordApp. 사용) Sub CreateWordDocument() ' Word 문서 새로 생성하기 ' Word 변수 객체 선언 ' Dim WordApp As New Word.Application ' Word 문서를 객체로 설정 WordApp.Visible = True 'New Apps will be hidden by default, so make visible ' 신규 문서 추가 Dim WordDoc As New Word.Document Set WordDoc..
[Excel VBA] MS WORD 자동화 (3) - WORD FILE 쓰기
Excel VBA로 MSWORD를 실행시키고, 문서를 추가한 후, 글자를 쓰는 예제를 만들어보았다. 개념을 정리해보면 MSWORD 프로그램을 가르키는 객체 변수, WordApp를 선언하고, MSWORD에 새문서를 추가하여 WordDoc 변수를 선언한 후, 글자는 WordApp에 입력을 한다. Ms Word 에 문서를 추가하고 글씨를 쓰는 예제 여기서, "WordApp.Selection.TypeParagraph"는 엔터키(줄바꿈)를 치는 것과 같은 효과이다. Sub CreateWordDocument() ' Word 문서 새로 생성하기 ' Word 변수 객체 선언 ' Dim WordApp As New Word.Application ' Word 문서를 객체로 설정 WordApp.Visible = True 'N..