메인 컨텐츠로 가기

Outlook에서 이메일을 PDF 파일로 저장: 단계별 가이드

작가: 실루비아 최종 수정 날짜: 2024-07-23

중요한 이메일을 PDF 파일로 저장하면 보관, 공유 또는 법적 문서화 목적에 매우 유용할 수 있습니다. Microsoft Outlook에는 이메일을 PDF로 저장하는 직접적인 옵션이 없지만 이를 달성하는 데 사용할 수 있는 몇 가지 방법이 있습니다. 다음은 Outlook에서 이메일을 PDF 파일로 저장하는 방법에 대한 포괄적인 가이드입니다.

인쇄 기능을 사용하여 이메일을 PDF 파일로 저장

VBA 코드를 사용하여 선택한 이메일을 PDF 파일로 저장

Outlook용 Kutools를 사용하여 선택한 이메일을 PDF 파일 또는 기타 파일 형식으로 저장좋은 생각 3


인쇄 기능을 사용하여 이메일을 PDF 파일로 저장

하나의 이메일을 PDF 파일로 저장하려는 경우 인쇄 기능이 도움이 될 수 있습니다.

1. PDF 파일로 저장하고 싶은 이메일을 선택하세요.

2. 을 클릭 입양 부모로서의 귀하의 적합성을 결정하기 위해 미국 이민국에 > 인쇄.

3. 프린터 드롭다운 메뉴에서 Microsoft PDF로 인쇄그리고 클릭 인쇄.

인쇄 기능 1을 사용하여 이메일을 PDF 파일로 저장

4. 에서 인쇄 출력을 다른 이름으로 저장 창에서 대상 폴더를 선택하고 파일 이름을 입력한 후 찜하기.

인쇄 기능 2을 사용하여 이메일을 PDF 파일로 저장

VBA 코드를 사용하여 선택한 이메일을 PDF 파일로 저장

1. 먼저 PDF로 저장할 이메일을 선택해야합니다.

2. 프레스 Alt + F11 시작하기 응용 프로그램 용 Microsoft Visual Basic 창.

3. 클릭 끼워 넣다 > 모듈을 클릭 한 다음 다음 VBA 코드를 복사하여 모듈 창에 붙여 넣습니다.

vba 1을 사용하여 이메일을 pdf 파일로 저장

이메일을 PDF 파일로 저장하는 VBA 코드 :

Sub SaveAsPDFfile()
Dim MyOlNamespace As NameSpace
Dim MySelectedItem As MailItem
Dim Response As String
Dim FSO As Object, TmpFolder As Object
Dim tmpFileName As String
Dim wrdApp As Object
Dim wrdDoc As Object
Dim bStarted As Boolean
Dim dlgSaveAs As FileDialog
Dim fdfs As FileDialogFilters
Dim fdf As FileDialogFilter
Dim i As Integer
Dim WshShell As Object
Dim SpecialPath As String
Dim msgFileName As String
Dim strCurrentFile As String
Dim strName As String
Dim oRegEx As Object
Dim intPos As Long
Set MyOlNamespace = Application.GetNamespace("MAPI")
Set MySelectedItem = ActiveExplorer.Selection.Item(1)
Set FSO = CreateObject("Scripting.FileSystemObject")
tmpFileName = FSO.GetSpecialFolder(2)
strName = "email_temp.mht"
tmpFileName = tmpFileName & "\" & strName
MySelectedItem.SaveAs tmpFileName, 10
On Error Resume Next
Set wrdApp = GetObject(, "Word.Application")
If Err Then
Set wrdApp = CreateObject("Word.Application")
bStarted = True
End If
On Error GoTo 0
Set wrdDoc = wrdApp.Documents.Open(FileName:=tmpFileName, Visible:=False, Format:=7)
Set dlgSaveAs = wrdApp.FileDialog(msoFileDialogSaveAs)
Set fdfs = dlgSaveAs.Filters
i = 0
For Each fdf In fdfs
i = i + 1
If InStr(1, fdf.Extensions, "pdf", vbTextCompare) > 0 Then
Exit For
End If
Next fdf
dlgSaveAs.FilterIndex = i
Set WshShell = CreateObject("WScript.Shell")
SpecialPath = WshShell.SpecialFolders(16)
msgFileName = MySelectedItem.Subject
Set oRegEx = CreateObject("vbscript.regexp")
oRegEx.Global = True
oRegEx.Pattern = "[\/:*?""<>|]"
msgFileName = Trim(oRegEx.Replace(msgFileName, ""))
dlgSaveAs.InitialFileName = SpecialPath & "\" & msgFileName
If dlgSaveAs.Show = -1 Then
strCurrentFile = dlgSaveAs.SelectedItems(1)
If Right(strCurrentFile, 4) <> ".pdf" Then
Response = MsgBox("Sorry, only saving in the pdf-format is supported." & _
vbNewLine & vbNewLine & "Save as pdf instead?", vbInformation + vbOKCancel)
If Response = vbCancel Then
wrdDoc.Close 0
If bStarted Then wrdApp.Quit
Exit Sub
ElseIf Response = vbOK Then
intPos = InStrRev(strCurrentFile, ".")
If intPos > 0 Then
strCurrentFile = Left(strCurrentFile, intPos - 1)
End If
strCurrentFile = strCurrentFile & ".pdf"
End If
End If
wrdApp.ActiveDocument.ExportAsFixedFormat OutputFileName:= _
strCurrentFile, _
ExportFormat:=17, _
OpenAfterExport:=False, _
OptimizeFor:=0, _
Range:=0, _
From:=0, _
To:=0, _
Item:=0, _
IncludeDocProps:=True, _
KeepIRM:=True, _
CreateBookmarks:=0, _
DocStructureTags:=True, _
BitmapMissingFonts:=True, _
UseISO19005_1:=False
End If
Set dlgSaveAs = Nothing
wrdDoc.Close
If bStarted Then wrdApp.Quit
Set MyOlNamespace = Nothing
Set MySelectedItem = Nothing
Set wrdDoc = Nothing
Set wrdApp = Nothing
Set oRegEx = Nothing
End Sub

주의 사항:이 VBA 코드는 Outlook 2007 및 2010에서 성공적으로 테스트되었습니다.

4. 클릭 vba 2을 사용하여 이메일을 pdf 파일로 저장 코드를 실행합니다.

5.있을 것입니다 파일 저장 코드가 실행되는 동안 대화 상자가 나타납니다. 파일을 저장할 경로를 선택하고 이름을 지정한 다음 마지막으로 찜하기 버튼을 클릭합니다.

vba 3을 사용하여 이메일을 pdf 파일로 저장

6. 코드 실행이 완료되면 이메일이 pdf 파일로 성공적으로 변환 된 것입니다.


Outlook용 Kutools를 사용하여 선택한 이메일을 PDF 파일 또는 기타 파일 형식으로 저장

Kutools for Outlook 설치된, 당신은 사용할 수 있습니다 Save Selected Emails as Files in Various Formats like PDF 선택한 이메일을 PDF 파일 / Excel 파일 / CSV 파일 또는 기타 파일 형식으로 빠르게 저장하거나 내보내는 유틸리티.

👉Outlook용 Kutools 무료 버전 출시되었으며, 누구의 70개 이상의 기능이 평생 무료로 제공됩니다.. 지금 무료 버전을 다운로드하세요.

1. 이메일 폴더에서 PDF로 저장할 메시지를 선택하고 Kutools > Save Selected Emails as Files in Various Formats like PDF.

2. 에서 Save Messages as Other Files 대화 상자에서 새 파일을 배치 할 경로를 선택하고 PDF format, 지정할 수 있습니다. Save content 필요에 따라

Outlook 1용 kutools를 사용하여 이메일을 PDF 파일로 저장

3. 클릭 Ok. 그런 다음 선택한 이메일이 개별적으로 PDF 파일로 저장되었습니다.

Outlook 2용 kutools를 사용하여 이메일을 PDF 파일로 저장

최고의 사무 생산성 도구

속보: Outlook용 Kutools 출시 무료 버전!

완전히 새로운 Outlook용 Kutools를 경험해보세요 70개 이상의 놀라운 기능을 갖춘 무료 버전으로 영원히 사용할 수 있습니다.! 지금 다운로드하려면 클릭하세요!

🤖 Kutools AI : AI 마법이 적용된 즉각적인 전문가 이메일 - 원클릭으로 천재적인 답변, 완벽한 어조, 다국어 숙달이 가능합니다. 손쉽게 이메일을 변환하세요! ...

📧 이메일 자동화: 자동 회신(POP 및 IMAP에서 사용 가능)  /  이메일 보내기 예약  /  이메일 발송 시 규칙에 따른 자동 참조/숨은참조  /  자동 전달(고급 규칙)   /  인사말 자동 추가   /  여러 수신자 이메일을 개별 메시지로 자동 분할 ...

📨 이메일 관리: 리콜 이메일  /  제목 및 기타 사기 이메일 차단  /  중복 이메일 삭제  /  고급 검색  /  폴더 통합 ...

📁 첨부 파일 프로일괄 저장  /  일괄 분리  /  일괄 압축  /  자동 저장   /  자동 분리  /  자동 압축 ...

🌟 인터페이스 매직: 😊더 예쁘고 멋진 이모티콘   /  중요한 이메일이 오면 알림  /  문을 닫는 대신 전망을 최소화하세요 ...

???? 원클릭 불가사의: 수신 첨부 파일과 함께 전체 회신  /   피싱 방지 이메일  /  🕘발신자의 시간대 표시 ...

👩🏼‍🤝‍👩🏻 연락처 및 캘린더: 선택한 이메일에서 연락처 일괄 추가  /  연락처 그룹을 개별 그룹으로 분할  /  생일 알림 제거 ...

한 번의 클릭으로 Outlook용 Kutools를 즉시 잠금 해제—영구적으로 무료. 기다리지 마세요. 지금 다운로드하여 효율성을 높이세요!

Outlook 기능을 위한 kutools1 Outlook 기능을 위한 kutools2
 

 

 

Comments (11)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
or (but for this you need to open the mail) you could use this:
ActiveInspector.WordEditor.ExportAsFixedFormat "c:\temp\test.pdf",ExportFormat:=17, OpenAfterExport:=False, OptimizeFor:=0, Range:=0, From:=0, To:=0, Item:=0, IncludeDocProps:=True, KeepIRM:=True, CreateBookmarks:=0, DocStructureTags:=True, BitmapMissingFonts:=True, UseISO19005_1:=False

This comment was minimized by the moderator on the site
Hi !!
I have follow all the instructions but it doesn't work, " Compile error : Syntax error"
Can you help me ? Please
Amaury
This comment was minimized by the moderator on the site
This macro is really great and easy to use as well,thank you so much for sharing this.
Just wanted to check is it possible to create same kind of macro for PDF attachment as well,because the above macro works only for excel and word format.

Can any one one help me on this.
This comment was minimized by the moderator on the site
I am wondering how I could change the folder the pdf goes to and change the filename(since all the emails I am copying are called the same thing
This comment was minimized by the moderator on the site
Been wondering how to do this for years, very easy, thank you
There are no comments posted here yet
Load More
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations