Word 문서를 빠르게 변환하는 3 가지 매크로 방법 PDF 파일

워드 솔루션 2025 년 9 월 28 일

이 기사에서는 Word 문서를 빠르게 변환하는 데 사용할 수있는 3 개의 매크로를 제공하는 데 중점을 둘 것입니다. pdf 파일.

Word 2003에서는 메뉴 모음에 아이콘이 있습니다. 한 번의 클릭으로 사용자는 "다른 이름으로 저장"창을 즉시 실행하고 문서를 pdf 형식입니다.

그러나 아시다시피 Word 2010의 레이아웃은 많이 변경됩니다. 그리고 사용자는 "파일"탭을 클릭 한 다음 "다른 이름으로 저장"명령을 클릭하여 "다른 이름으로 저장"창을 실행해야합니다. 또한 "저장"버튼을 누르기 전에 수동으로 저장 유형을 선택해야합니다.

이 모든 클릭으로는 충분히 빠르지 않습니다. 따라서이 post, 우리는이를위한 매크로 방식을 보여주고 싶습니다.

매크로 1 : "다른 이름으로 저장"창을 빠르게 트리거

첫 번째와 포름ost, "개발자"탭을 클릭 한 다음 "Visual Basic"명령을 클릭하여 VBA 편집기를 엽니 다. 확실히 "개발자"탭이 이미 표시되어있을 때 두 번의 클릭을 수행해야합니다. 다른 방법은 "Alt + F2"을 누르는 것입니다.
둘째,“일반”프로젝트를 클릭합니다.
셋째, "삽입"을 클릭 한 다음 목록 메뉴에서 "모듈"을 선택합니다.
이제 모듈을 두 번 클릭하여 편집 영역을 표시합니다.
다음으로 다음 코드를 붙여 넣습니다.

Sub TriggerSaveAsWindow()
  Dim dlgSaveAs As Dialog
 
  Set dlgSaveAs = Dialogs(wdDialogFileSaveAs)
  With dlgSaveAs
    .Format = wdFormatPDF
    .Show
    .Execute
  End With
End Sub

그런 다음 "실행"을 클릭합니다.

이제 "다른 이름으로 저장"창이 있습니다. 그리고 저장 유형은 이미 pdf. 남은 일은“저장”버튼을 클릭하는 것입니다. 이 매크로를 사용하면 필요한 경우 파일 이름을 변경할 수 있습니다.

매크로 2 : Word 파일을 직접 저장 PDF

어떤 사람들은 파일을 직접 저장하려는 경우 pdf 파일 이름을 수정하지 않고 필요한 매크로는 다음과 같습니다.

먼저 위의 처음 4 단계를 반복합니다.
그런 다음 대신 다음 코드를 붙여 넣으십시오.

'Directly save Word file as Pdf and aumatically open it.
Sub DirectlySaveDocxToPdf()
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
  objDoc.ExportAsFixedFormat _
    OutputFileName:=Replace(objDoc.FullName, ".docx", ".pdf"), _
    ExportFormat:=wdExportFormatPDF, OpenAfterExport:=True, OptimizeFor:=wdExportOptimizeForPrint, _
    Range:=wdExportAllDocument, Item:=wdExportDocumentContent
End Sub

마찬가지로 "실행"을 클릭합니다.

매크로 3 : Word Docx 파일을 다음으로 일괄 변환 PDFs

먼저 모든 docx 파일을 하나의 폴더에 넣으십시오.
위의 단계에 따라 편집 영역을 엽니 다.
그런 다음 다음 매크로를 붙여 넣습니다.

Sub BatchConvertDocxToPDF()
  Dim objDoc As Document
  Dim strFile As String, strFolder As String
 
  'Initialization
  strFolder = "C:\Users\Test\Desktop\Test Files\"
  strFile = Dir(strFolder & "*.docx", vbNormal)
 
  'Precess each file in the file folder and convert them to pdf.
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=strFolder & strFile)
 
    objDoc.ExportAsFixedFormat _
      OutputFileName:=Replace(objDoc.FullName, ".docx", ".pdf"), _
      ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:=wdExportOptimizeForPrint, _
      Range:=wdExportAllDocument, Item:=wdExportDocumentContent
 
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

"실행"버튼을 클릭하는 것을 잊지 마십시오.

주의 사항: 코드에서 "strFolder = "C : \ Users \ Test \ Desktop \ Test Files \"",""C : \ Users \ Test \ Desktop \ Test Files \" " 폴더의 파일 경로입니다. 그에 따라 변경하는 것을 잊지 마십시오.

이 매크로를 실행 한 후 pdfs는 Word 문서가있는 동일한 폴더에 저장됩니다.

가능한 한 파일 보안

예방 조치와 또한 post-손상된 파일을 복구하기위한 재난 조치. 정기적으로 파일을 계속 백업하는 경우 원본 파일을 복원하는 것은 케이크 조각에 불과합니다. 진실은 백업 계획을 고수 할 수있는 사람이 거의 없으므로 귀중한 데이터 손실 위험이 증가합니다. 이러한 상황에서 고급에 의지 할 시간입니다 Word 문서 손상 수정 도구.

저자 소개 :

Vera Chen은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. 손상된 Excel xlsx 수정 pdf 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM