☰

Outlook 巨集在回覆時會變更“樣式集”

tag-icon • tag-icon microsoft-outlook microsoft-outlook-2010 formatting macros
Outlook 巨集在回覆時會變更“樣式集”

我有以下問題：使用 Outlook 2010 - 或一般的 Outlook - 當您回覆 HTML 格式的電子郵件時，會使用收到的電子郵件中的某些格式。

通常段落設定與我的模板不同。我找到了一種將格式更改為我的標準設定的簡單方法：

在開啟的電子郵件中，在功能區上選擇：
選項卡“設定文字格式”，按一下右側的“變更樣式”，選擇“樣式集”，選擇“Word 2003”

現在我想建立一個巨集，當我選擇「回覆」、「回覆全部」或「轉發」時，它會自動執行該任務。

不幸的是 Outlook 沒有巨集記錄器:( 我發現了類似的東西，但根本沒有回應：Outlook 2007：回覆與轉送無法使用預設格式
或者這個宏在這裡不起作用：http://www.codetwo.com/admins-blog/set-email-reply-format-automatically/

在 GUI 中執行上述步驟的巨集程式碼是什麼？

答案1

您可以只套用所需的樣式集，然後選擇設為預設在底部改變風格菜單。

或者你可以這樣做：

Public WithEvents OutlookInspectors As Outlook.Inspectors
Public WithEvents OutlookInspector As Outlook.Inspector

Private Sub Application_Startup()
    Set OutlookInspectors = Application.Inspectors
End Sub

Private Sub OutlookInspectors_NewInspector(ByVal Inspector As Inspector)
    Set OutlookInspector = Inspector
End Sub

Private Sub OutlookInspector_Activate()
    On Error Resume Next
    Dim Item As MailItem

    If Not OutlookInspector Is Nothing Then
        Set Item = OutlookInspector.CurrentItem
        If Not Item Is Nothing And Item.Size = 0 Then
            OutlookInspector.WordEditor.ApplyQuickStyleSet "Word 2003"
        End If
    End If

    Set OutlookInspector = Nothing
End Sub

相關內容