☰

將「請求已讀回執」新增至 Outlook 2013/2016 功能區（工具列）

tag-icon • tag-icon microsoft-outlook-2013
將「請求已讀回執」新增至 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 進行測試。在「撰寫工具/訊息」中建立一個新群組並新增此巨集...

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 中所做的： - 前往「自訂功能區」並選擇右側的「工具標籤」。 - 然後展開「撰寫工具」下的「訊息」（其中有兩個，我為兩個都做了）並新增一個新群組。 - 在左側選擇“所有命令”，然後選擇“訊息選項”，然後將此按鈕新增至新群組。

現在，在編寫內嵌訊息時，請按一下功能區中的「訊息選項」按鈕，然後選擇「請求已讀回執」。

相關內容