[MS 워드 VBA 매크로] 새 문서 열기, 클립보드 내용 붙이기, 문서 저장

MS 워드에서 새 문서를 열어 클립보드의 내용을 붙여 넣은 후 저장하는 매크로입니다.

• OS: Windows 10 (64비트)
• Application: MS Word 2016 

Sub Word_VBA_NewDocumentSaveAs()
'
' 작동 절차
' 1. 새로운 문서를 연다.
' 2. 클립보드의 내용을 새 문서에 붙여넣는다.
' 3. 새 문서를 저장한다.
'
    '새로운 워드 파일을 연다
    Documents.Add Template:="Normal", NewTemplate:=False, DocumentType:=0
    
    '클립보드의 내용을 새 문서에 붙여넣는다.
    Selection.Paste
    
    '파일명을 "New.docx"로 정한 후 저장한다.
    ActiveDocument.SaveAs2 _
    	FileName:="New.docx", _
        FileFormat:= wdFormatXMLDocument, _
        Password:="", _
        AddToRecentFiles :=True, _
        WritePassword:="", _
        ReadOnlyRecommended:=False, 
        EmbedTrueTypeFonts :=False, _
        CompatibilityMode := 15

End Sub

 

아래는 Document.SaveAs2 메서드의 각 파라미터에 대한 설명입니다. Data type은 모두 Variant형이며, SaveAs2 메서드는 아래의 파라미터 외에도 파라미터들이 더 있지만 주로 사용되는 것만 골라봤습니다. 

• FileName: 파일 명 (별도 지정이 없으면 현재 폴더에 저장되며, 이미 동일한 파일이 있는 경우에도 사용자에 묻지 않고 덮어씁니다.)
• FileFormat: 파일이 저장되는 포맷을 지정하며 WdSaveFotmat 상수 중 선택 가능합니다. WdSaveFormat 상수에 대한 세부 사항은 아래 MS Word VBA Reference 링크를 참고하세요.
  
• Password: 파일 열기 암호
• AddToRecentFiles: True로 지정하면 '파일' 메뉴의 최근 사용 목록에 추가됨. 기본 설정(default)는 True.
• WrittenPassword: 파일의 변경 사항을 저장하기 위한 암호
• ReadOnlyRecommended: True로 지정할 경우, 파일을 열때마다 워드에서 '읽기 전용'으로 열 것을 제안함. 기본 설정은 False.
• EmbedTrueTypeFonts: True로 지정할 경우, 파일에 트루타입 폰트를 같이 저장함.
• CompatibilityMode: 파일을 열 때 워드가 사용할 호환 모드를 지정하며, WdCompatibilityMode 상수 중 선택 가능합니다. 위 예제의 15는 기본 값으로 모든 워드 기능을 사용할 수 있는 모드입니다.
• WdComPatibilityMode 상수에 대한 세부 사항은 아래 MS Word VBA Reference을 참고하세요.
  

OS 버전이나 MS 워드의 버전에 따라 함수 명이 조금씩 다를 수 있는 점 참고하세요~

 

Reference

[1] Document.SaveAs2 메서드 https://docs.microsoft.com/en-us/office/vba/api/word.saveas2

[2] WdSaveFormat 상수 https://docs.microsoft.com/en-us/office/vba/api/word.wdsaveformat

[3] WdCompatibilityMode 상수 https://docs.microsoft.com/en-us/office/vba/api/word.wdcompatibilitymode