Outlook 에서 수신 이메일의 특정 키워드를 자동으로 강조 표시하는 방법

Outlook 에서는 매일 수백~수천 건의 이메일을 받을 수 있습니다. 수신 이메일에서 특정 키워드를 자동으로 강조 표시하고 싶은 적이 있으신가요? 이 문서에서는 Outlook 에서 수신 이메일의 지정된 키워드를 자동으로 강조 표시하는 VBA 코드를 소개합니다。

수신 이메일에서 키워드 자동 강조 표시

---

수신 이메일에서 키워드 자동 강조 표시

Outlook 에는 VBA 외에 이 작업을 처리할 수 있는 기본 제공 기능이 없습니다。

1. Alt + F11키를 눌러Microsoft Visual Basic for Applications창을 활성화합니다。

2. 그런 다음 왼쪽ThisOutlookSession을 더블클릭하고 아래 코드를 새 코드 창에 복사하여 붙여넣습니다。Project패널에서

VBA： 수신 이메일에서 키워드 자동 강조 표시

Public WithEvents GMailItems As Outlook.Items
'UpdatebyExtendoffice20181106
Private Sub Application_Startup()
    Set GMailItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub GMailItems_ItemAdd(ByVal Item As Object)
    If Item.Class <> olMail Then Exit Sub
    AutoHighlight_SpecificWords Item
End Sub
Sub AutoHighlight_SpecificWords(Mail As Outlook.MailItem)
    Dim xWord As Variant
    Dim xHTMLBody As String, xStr As String
    Dim xWordArr
    On Error Resume Next
    xWordArr = Array("Kutools", "Important")  'keyword
    xHTMLBody = Mail.HTMLBody
    For Each xWord In xWordArr
        If InStr(xHTMLBody, xWord) > 0 Then
            xStr = "<font style=" & Chr(34) & "background-color: yellow" & Chr(34) & ">" & xWord & "</font>"
            xHTMLBody = Replace(xHTMLBody, xWord, xStr)
            Mail.HTMLBody = xHTMLBody
        End If
    Next
    Mail.Save
End Sub

 

팁：코드에서 이 스크립트의xWordArr = Array(「Kutools」, 「Important」)부분에서 필요에 따라 키워드를 변경할 수 있습니다。

3. 그런 다음 코드를 저장하고 Outlook 으로 돌아갑니다。홈탭에서규칙>규칙 및 알림 관리를 클릭합니다。

4. 규칙 및 알림대화 상자에서새 규칙을 클릭합니다()전자 메일 규칙탭 아래)。 그런 다음규칙 마법사대화 상자에서내가 받는 메시지에 규칙 적용을 클릭합니다。

5. 다음>다음>예를 클릭하여 세 번째 대화 상자로 이동한 후，스크립트 실행을1 단계섹션에서 선택합니다。 그런 다음스크립트를2 단계섹션에서 클릭하여스크립트 선택대화 상자를 열고 이 코드Project1.ThisOutlookSession.AutoHighlight_SpecificWords를 선택합니다。확인을 클릭합니다。

6. 다음>다음을 클릭하고 마지막 대화 상자에서 이 규칙의 이름을 지정합니다。

7. 마침>확인을 클릭하여 규칙 설정을 완료합니다。

이제부터 지정한 키워드는 수신 이메일에서 자동으로 강조 표시됩니다。

---

Outlook 에서 여러 이메일을 다른 형식 파일(PDF/HTML/WORD/EXCEL)로 저장하거나 내보내기

때로는 Outlook 에서 이메일을 PDF, Word 또는 Excel 파일와 같은 다른 형식의 파일로 폴더에 저장하거나 내보내고 싶을 수 있습니다. 하지만 Outlook 의 '다른 이름으로 저장‘ 및 '내보내기‘ 기능 중 어느 것도 이 작업을 처리할 수 없습니다。 그러나Kutools for Outlook의Save as file유틸리티를 사용하면 여러 이메일을 한 번에 여러 형식의 파일로 폴더에 내보낼 수 있습니다。    45 일 무료 체험판을 지금 시작하세요！

Kutools for Outlook: 수십 가지 유용한 Outlook 애드인을 제공하며, 45 일 동안 제한 없이 무료로 체험할 수 있습니다。