메인 컨텐츠로 가기

보낸 항목에서 이메일을 보낸 후 첨부 파일을 자동으로 제거하는 방법은 무엇입니까?

일부 첨부 파일이있는 이메일을 보낼 때 첨부 파일은 기본적으로 이메일과 함께 보낸 항목 폴더에 저장됩니다. PST 파일의 크기를 줄이려면 이메일을 보낸 후 자동으로 보낸 항목에서 첨부 파일을 제거 할 수 있습니다. 이 기사에서는 Outlook 에서이 작업에 대해 설명합니다.

보낸 항목에서 전자 메일을 보낸 후 자동으로 첨부 파일 제거


보낸 항목에서 전자 메일을 보낸 후 자동으로 첨부 파일 제거

다음 VBA 코드는 Outlook에서 이메일을 보낸 후 첨부 파일을 자동으로 삭제하는 데 도움이 될 수 있습니다.

1. 누르고 ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. . 응용 프로그램 용 Microsoft Visual Basic 창, 더블 클릭 ThisOutlook세션 인사말 프로젝트 1 (VbaProject.OTM) 창을 열어 모드를 연 다음 다음 코드를 복사하여 빈 모듈에 붙여 넣습니다.

VBA 코드 : 보낸 항목에서 전자 메일을 보낸 후 첨부 파일 자동 제거 :

Public WithEvents SentMailItems As Outlook.Items
    Private Sub Application_Startup()
    Set SentMailItems = Outlook.Application.Session.GetDefaultFolder(olFolderSentMail).Items
    End Sub
    Sub SentMailItems_ItemAdd(ByVal Item As Object)
    Dim xSentMail As Outlook.MailItem
    Dim xAttachments As Outlook.Attachments
    Dim xAttachment As Outlook.Attachment
    Dim xAttachmentInfo As String
    On Error Resume Next
    If Item.Class = olMail Then
       Set xSentMail = Item
    End If
    Set xAttachments = xSentMail.Attachments
    For i = xAttachments.Count To 1 Step -1
        Set xAttachment = xAttachments.Item(i)
        xAttachmentInfo = "<HTML><BODY>" & xAttachment.DisplayName & _
                          "</BODY></HTML>" & vbCrLf & xAttachmentInfo
        xAttachment.Delete
    Next
    xSentMail.HTMLBody = "<HTML><BODY><font color=#FF0000>Attachment Removed: </font><br/></BODY></HTML>" & _
                         xAttachmentInfo & "<HTML><BODY><br/></BODY></HTML>" & xSentMail.HTMLBody
    xSentMail.Save
End Sub

3. 위의 코드를 삽입한 후 Outlook을 다시 시작하여 코드를 적용하세요.

4. 이제부터 첨부 파일이 포함된 이메일을 보내면 다음 스크린샷과 같이 보낸 항목에서 첨부 파일이 자동으로 삭제됩니다.

주의 사항: 이 코드는 기본 데이터 계정에서만 사용할 수 있습니다.


최고의 사무 생산성 도구

Outlook 용 Kutools - 귀하의 전망을 강화하는 100개 이상의 강력한 기능

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

📨 이메일 관리: 이메일을 쉽게 기억할 수 있습니다.  /  제목 및 기타 사기 이메일 차단  /  중복 이메일 삭제  /  고급 검색  /  폴더 통합 ...

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

🌟 인터페이스 매직: 😊더 예쁘고 멋진 이모티콘   /  탭 보기로 Outlook 생산성 향상  /  문을 닫는 대신 전망을 최소화하세요 ...

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

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

이상 100 특징 당신의 탐험을 기다려주세요! 더 알아보려면 여기를 클릭하세요.

 

 

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations