Outlook 2013/2016 리본(도구 모음)에 "읽음 확인 요청" 추가

Outlook 2013/2016 리본(도구 모음)에 "읽음 확인 요청" 추가

Office 2013에서는 "인라인"으로 회신할 수 있습니다. 즉, 이메일로 새 창을 열 필요가 없습니다.

새 창에서 이메일 초안 작성을 선택한 경우 "옵션" 탭에 옵션이 있습니다. 또한 QAT(빠른 액세스 도구 모음)에 추가할 수도 있습니다. 괜찮아!

그러나 인라인으로 응답하는 경우 새 탭 "도구/메시지 작성"이 열리고 원할 때마다 "태그"로 이동하여 활성화해야 합니다. "도구/메시지 작성"에서 새 그룹을 만들었지만 "모든 명령"에서 "읽음 확인 요청" 옵션을 사용할 수 없습니다.

해결 방법을 알고 있나요? 감사해요!

답변1

@thims 해결 방법에 대한 약간의 확장은 다음과 같습니다. 읽음 확인 값만 설정하는 것이 아니라 토글하여 1초 동안 상태를 표시합니다.제목줄. 더 나은 방법을 찾을 수 없습니다. 제안을 환영합니다 :)

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

' toggle ReadReceiptRequested for ActiveInlineResponse
Sub RequestReadReceipt()
    Dim oMail As MailItem
    Set oMail = ActiveExplorer.ActiveInlineResponse
    If Not oMail Is Nothing Then
        oMail.ReadReceiptRequested = Not oMail.ReadReceiptRequested
        TempSubject = oMail.Subject
        oMail.Subject = "ReadReceiptRequested: " & oMail.ReadReceiptRequested
        DoEvents
        Sleep 1000
        oMail.Subject = TempSubject
    End If
End Sub

Outlook 2016에서 테스트되었습니다. 힌트: 개발자 옵션에서 Visual Basic을 열고 코드를 ThisOutlookSession에 붙여넣습니다. "도구/메시지 작성"에서 새 그룹을 만들고 다음 매크로를 추가하세요...

표시 기간 동안 Outlook이 중단되는 것은 그리 좋지 않지만, 이렇게 하면 해당 제목이 남용되는 이메일을 보내지 않게 됩니다. :)

답변2

해결 방법은 다음과 같이 VBA 매크로를 사용하는 것입니다.

Sub RequestReadReceipt()
    Set objItem = ActiveExplorer.ActiveInlineResponse
    If Not objItem Is Nothing Then
        objItem.ReadReceiptRequested = True
    End If
End Sub

이제 리본 그룹에 이 매크로를 실행하는 버튼을 넣을 수 있습니다.

답변3

또 다른 옵션은 "작성 도구" 아래의 "메시지" 도구 모음에 있는 새 그룹에 "메시지 옵션" 버튼을 추가하는 것입니다.

이것이 제가 Outlook 2016에서 수행한 작업입니다. - "리본 사용자 정의"로 이동하여 오른쪽에 있는 "도구 탭"을 선택합니다. - 그런 다음 "작성 도구" 아래의 "메시지"를 확장하고(두 가지가 있는데 저는 두 가지 모두에 대해 수행했습니다) 새 그룹을 추가합니다. - 왼쪽에서 "모든 명령"을 선택하고 "메시지 옵션"을 선택한 후 이 버튼을 새 그룹에 추가합니다.

이제 인라인 메시지를 작성할 때 리본에서 "메시지 옵션" 버튼을 클릭하고 "읽음 확인 요청"을 선택하세요.

관련 정보