Note: The other languages of the website are Google-translated. Back to English
로그인  \/ 
x
or
x
Register  \/ 
x

or

Outlook에서 이메일을 열지 않고 첨부 파일을 저장하는 방법은 무엇입니까?

받은 이메일의 첨부 파일을 컴퓨터 디스크에 자주 저장해야 할 수 있습니다. 이메일 메시지의 첨부 파일 또는 모든 첨부 파일을 저장하는 것은 쉽지만 여러 이메일의 첨부 파일을 한 번에 저장하는 방법은 무엇입니까? 일반적으로 이메일을 반복적으로 열고 첨부 파일을 저장해야합니다. 반복되는 작업을 제거하는 트릭이 있습니까? 이 자습서의 방법이 도움이 될 수 있습니다.

VBA 코드로 열지 않고 하나 이상의 이메일에서 첨부 파일 저장
놀라운 도구를 사용하여 열지 않고도 하나 이상의 이메일에서 첨부 파일 저장


VBA 코드로 열지 않고 하나 이상의 이메일에서 첨부 파일 저장

아래 VBA 코드는 Outlook에서 이메일을 열지 않고도 동시에 하나 이상의 이메일에서 첨부 파일을 저장하는 데 도움이 될 수 있습니다. 다음과 같이하십시오.

1. 첨부 파일을 저장할 이메일 또는 여러 이메일을 선택하고 다른 + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. 확장 Microsoft Outlook 개체 폴더에서 ThisOutlookSession 를 열려면 암호 창에 다음 VBA 코드를 복사하십시오.

VBA 코드 : 이메일을 열지 않고 첨부 파일 저장

Public Sub SaveAttachmentsWithoutOpening()
'Updated by Extendoffice 20191008
Dim xMailItem As Outlook.MailItem
Dim xAttachments As Outlook.Attachments
Dim xAttachment As Outlook.Attachment
Dim i As Long
Dim xCount As Long
Dim xFileName As String
Dim xSavePath As String
Dim xOriginalFiles As String
On Error Resume Next
Set xShell = CreateObject("Shell.Application")
Set xFolder = xShell.BrowseForFolder(0, "Select a folder:", 0, strStartingFolder)
If Not TypeName(xFolder) = "Nothing" Then
    Set xFolderItem = xFolder.self
    xSavePath = xFolderItem.Path & "\"
Else
    xFileName = ""
    Exit Sub
End If
For Each xMailItem In Outlook.ActiveExplorer.Selection
    Set xAttachments = xMailItem.Attachments
    xCount = xAttachments.Count
    xOriginalFiles = ""
    If xCount > 0 Then
        For i = xCount To 1 Step -1
            Set xAttachment = xAttachments.Item(i)
            If IsEmbeddedAttachment(xAttachment) = False Then
                xFileName = xSavePath & xAttachment.FileName
                xAttachment.SaveAsFile xFileName
                xAttachment.Delete
                If xMailItem.BodyFormat <> olFormatHTML Then
                    xOriginalFiles = xOriginalFiles & vbCrLf & "file://" & xFileName
                Else
                    xOriginalFiles = xOriginalFiles & "<br>" & "<a href='file://" & xFileName & "'>" & xFileName & "</a>"
                End If
            End If
        Next i
        If xMailItem.BodyFormat <> olFormatHTML Then
            xMailItem.Body = "The file(s) were saved to " & xOriginalFiles & vbCrLf & vbCrLf & xMailItem.Body
        Else
            xMailItem.HTMLBody = "<p>" & "The file(s) were saved to " & xOriginalFiles & "</p>" & xMailItem.HTMLBody
        End If
        xMailItem.Save
    End If
Next
Set xAttachments = Nothing
Set xMailItem = Nothing
End Sub

Function IsEmbeddedAttachment(Attach As Attachment)
Dim xItem As MailItem
Dim xCid As String
Dim xID As String
Dim xHtml As String
On Error Resume Next
IsEmbeddedAttachment = False
Set xItem = Attach.Parent
If xItem.BodyFormat <> olFormatHTML Then Exit Function
xCid = ""
xCid = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
If xCid <> "" Then
    xHtml = xItem.HTMLBody
    xID = "cid:" & xCid
    If InStr(xHtml, xID) > 0 Then
        IsEmbeddedAttachment = True
    End If
End If
End Function

4. 누르세요 F5 코드를 실행하는 키입니다. 그 다음에 폴더 찾아보기 창이 나타나면 첨부 파일을 저장할 폴더를 선택한 다음 OK 버튼을 클릭합니다.

그러면 선택한 이메일의 모든 첨부 파일이 선택한 폴더에 즉시 저장됩니다.

참고 : 모든 첨부 파일이 이메일에서 분리되고 해당 저장 경로 링크가 이메일 본문에 유지됩니다.


놀라운 도구를 사용하여 열지 않고도 하나 이상의 이메일에서 첨부 파일 저장

VBA 초보자라면이 섹션의 방법이 좋은 선택이 될 것입니다.

여기에서 모든 첨부 파일 저장 유틸리티 Outlook 용 Kutools 당신을 위해. 선택한 이메일에서 분리하지 않고 첨부 파일 만 저장하려는 경우 모든 첨부 파일 저장 기능을 사용하면 쉽게 완료 할 수 있습니다. 다음과 같이하십시오.
Outlook 용 Kutools를 적용하기 전에 다운로드하여 설치 첫째로.

1. 저장할 첨부 파일이 포함 된 이메일을 선택하고 쿠툴 > 부착 도구모두 저장.

2. 에서 설정 저장 대화 상자에서 다음을 수행해야합니다.

  • 2.1)에서 이 폴더에 첨부 파일 저장 섹션에서 첨부 파일을 저장할 폴더를 선택하십시오.
  • 2.2)를 아래 스타일로 첨부 파일 저장 certian 스타일로 하위 폴더를 만들어 첨부 파일을 저장하거나 저장된 첨부 파일의 이름을 certian 스타일로 이름을 바꾸려면 상자는 선택 사항입니다.
  • 2.3) 클릭 OK 선택한 이메일의 모든 첨부 파일 저장을 시작합니다.

: 위의 구성을 사용하면 모든 첨부 파일이 지정된 폴더에 저장됩니다. 파일 이름에 인증 단어 "invoice"가 포함 된 PDF 파일 만 저장하는 등 일부 인증 첨부 ​​파일 만 저장하려는 경우 다음과 같이 필터 조건을 구성 할 수 있습니다.  

  • 클릭 고급 옵션 확장하려면 버튼 필터 조건s;
  • 필요에 따라 조건을 지정하십시오.
    팁 : 여기서 나는 첨부 파일 이름 상자를 포함하고 텍스트 상자에 "인보이스"를 입력 한 다음 부착 유형 상자에 ".pdf"를 텍스트 상자에 입력합니다.

3. 다음 팝업 대화 상자에서 가능 계속합니다.

그런 다음 선택한 이메일의 첨부 파일이 지정된 폴더에 한 번에 저장됩니다.

: 선택한 이메일에서 첨부 파일을 분리하고 이메일 본문에 첨부 파일 하이퍼 링크 만 남겨 두려면 모든 첨부 파일 분리 기능이 도움이 될 수 있습니다.

  이 유틸리티의 무료 평가판(60일)을 사용하려면 그것을 다운로드하려면 클릭하십시오을 클릭 한 다음 위 단계에 따라 작업 적용으로 이동합니다.


관련 기사

Outlook에서 특정 폴더로 첨부 파일을 자동으로 다운로드 / 저장
일반적으로 Outlook에서 첨부 파일> 모든 첨부 파일 저장을 클릭하여 한 전자 메일의 모든 첨부 파일을 저장할 수 있습니다. 그러나 수신 된 모든 이메일 및 수신 이메일의 모든 첨부 파일을 저장해야하는 경우 이상적인 것은 무엇입니까? 이 기사에서는 Outlook에서 특정 폴더로 첨부 파일을 자동으로 다운로드하는 두 가지 솔루션을 소개합니다.

Outlook에서 회신 할 때 첨부 파일 유지
Microsoft Outlook에서 이메일 메시지를 전달할 때이 이메일 메시지의 원본 첨부 파일은 전달 된 메시지에 남아 있습니다. 그러나 이메일 메시지에 회신 할 때 원본 첨부 파일은 새 회신 메시지에 첨부되지 않습니다. 여기에서는 Microsoft Outlook에서 회신 할 때 원본 첨부 파일을 유지하는 방법에 대한 몇 가지 트릭을 소개합니다.

Outlook의 첨부 파일 (콘텐츠) 내의 검색 단어
Outlook의 빠른 검색 상자에 키워드를 입력하면 이메일 제목, 본문, 첨부 파일 등에서 키워드를 검색합니다.하지만 이제 Outlook에서만 첨부 파일 콘텐츠에서 키워드를 검색하면됩니다. 이 문서에서는 Outlook의 첨부 파일 콘텐츠 내에서 단어를 쉽게 검색하는 자세한 단계를 보여줍니다.


    Outlook 용 Kutools-Outlook에 100 개의 고급 기능을 제공하고 작업을 훨씬 더 쉽게 만듭니다!

    • 자동 CC / BCC 이메일을 보낼 때 규칙에 따라; 자동 전달 사용자 정의에 의한 여러 이메일; 자동 회신 교환 서버없이 더 많은 자동 기능 ...
    • BCC 경고 -모두 답장하려고 할 때 메시지 표시 메일 주소가 숨은 참조 목록에있는 경우; 첨부 파일 누락시 알림및 기타 알림 기능 ...
    • 메일 대화에서 모든 첨부 파일로 (전체) 회신; 많은 이메일에 답장 초 안에; 인사말 자동 추가 대답 할 때; 제목에 날짜 추가 ...
    • 첨부 도구 : 모든 메일의 모든 첨부 파일 관리, 자동 분리, 모두 압축, 모두 이름 바꾸기, 모두 저장 ... 빠른 보고서, 선택한 메일 수...
    • 강력한 정크 메일 관습에 의해; 중복 메일 및 연락처 제거... Outlook에서 더 스마트하고 빠르며 더 나은 작업을 수행 할 수 있습니다.
    샷 kutools 전망 kutools 탭 1180x121
    샷 kutools 전망 kutools 플러스 탭 1180x121
     
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.