열려 있거나 선택한 전자 메일에서 첨부 파일 정보 목록을 추출하고 싶습니까? 수동으로 가져 오려면 시간이 많이 걸립니다. 이 기사에서는 Outlook VBA를 사용하여이를 수행하는 빠른 방법을 소개합니다.
어떤 이유로 이메일에서 첨부 파일 이름, 색인 및 크기 등의 첨부 파일 정보 목록을 가져와야 할 수 있습니다. 아마도 보고서를 작성하거나 첨부 파일 목록과 함께 이메일에 답장해야하기 때문일 수 있습니다. . 왜 필요한지에 관계없이 수동으로, 즉 하나씩 확인하고 복사하면 매우 번거롭고 오류가 발생하기 쉽습니다. 그렇다면 VBA에 의지하지 않는 이유는 무엇입니까? utm으로 첨부 파일에 대한 모든 종류의 정보를 얻는 데 도움이 될 수 있습니다.ost 용이함. 자세한 단계와 해당 VBA 코드는 다음과 같습니다.
이메일에서 첨부 파일 정보 목록 추출
- 처음에는 Outlook을 정상적으로 시작하십시오.
- 그런 다음 "Alt + F11"바로 가기를 눌러 VBA 편집기에 액세스합니다.
- 다음 창에서 사용하지 않는 모듈을 열거 나“Insert”>“Module”을 선택하여 새 모듈을 삽입해야합니다.
- 다음으로 다음 VBA 코드를 복사하여 새 모듈에 붙여 넣을 수 있습니다.
Sub GetlAttachmentList()
Dim olItem As MailItem
Dim olAtt As attachment
Dim olAtts As Attachments
Dim sAttInfo As String
Dim Dataobj As DataObject
Select Case Application.ActiveWindow.Class
Case olExplorer
Set olItem = ActiveExplorer.Selection.Item(1)
Case olInspetor
Set olItem = ActiveInspector.CurrentItem
End Select
If TypeOf olItem Is MailItem Then
Set olAtts = olItem.Attachments
If olAtts.Count > 0 Then
For Each olAtt In olAtts
sAttInfo = sAttInfo & vbCrLf & "------------------------------------------------------------" & vbCrLf
sAttInfo = sAttInfo & "No. " & olAtt.Index & " : " & olAtt.DisplayName & " Size: " & olAtt.Size & ".KB"
Next
sAttInfo = sAttInfo & vbCrLf & "------------------------------------------------------------"
'Copy the attachment list
Set Dataobj = New MSForms.DataObject
Dataobj.SetText sAttInfo
Dataobj.PutInClipboard
End If
End If
End Sub
- 그런 다음 현재 창을 닫고 빠른 실행 도구 모음에 새 프로젝트를 추가 할 수 있습니다.
- 먼저 "파일"> "옵션"으로 이동합니다.
- 그런 다음 "Outlook 옵션"창에서 "빠른 액세스 도구 모음"탭으로 전환합니다.
- 그런 다음 아래 스크린 샷에 표시된 단계에 따라 새 매크로를 추가합니다.
- 기본 Outlook 창으로 돌아간 후 시도해 볼 수 있습니다.
- 먼저 이메일을 선택하고 빠른 실행 도구 모음에서 매크로 버튼을 누르십시오.
- 그러면이 이메일의 첨부 파일 목록이 클립 보드에 저장됩니다.
- 이제 새 이메일이나 빈 문서를 열고 "Ctrl + V"를 누를 수 있습니다. 그러면 다음 스크린 샷과 같은 목록이 표시됩니다.
Outlook 문제를 충족 할 때 지연되지 않음
Outlook에 가장 큰 단점이 있다는 사실은 부인할 수 없습니다. Outlook 이메일 오류, Outlook 충돌, 정지 또는 응답 없음 등. 따라서 여러 사용자가 많은 어려움을 겪었을 것입니다. 실제로받은 편지함 복구 도구를 먼저 사용하여 사용해 볼 수 있습니다. 실패하면 다음과 같은 더 강력한 도구로 전환해야 할 수 있습니다. DataNumen Outlook Repair.
저자 소개 :
Shirley Zhang은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. 손상된 수리 SQL Server mdf DB 및 전망 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM


