Outlook에서 회신 및 전달에 대해 다른 서명을 설정하는 방법은 무엇입니까?

일반적으로 Outlook의 다른 계정에 대해 다른 서명을 설정할 수 있지만 회신 및 전달에 대해 다른 서명을 적용하려고 시도한 적이 있습니다. 즉, 이메일 회신시 signature1이 삽입되고, 이메일 전달시 signature2가 적용됩니다. Outlook에서이 작업을 어떻게 해결할 수 있습니까?

VBA 코드로 회신 및 전달에 대해 다른 서명 설정

VBA 코드로 회신 및 전달에 대해 다른 서명 설정

다음 VBA 코드는 회신 및 전달에 대해 서로 다른 서명을 설정하는 데 도움이 될 수 있습니다. 아래 단계를 하나씩 수행하십시오.

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

2. 그런 다음 끼워 넣다 > 모듈, 아래 코드를 복사하여 열린 빈 모듈에 붙여 넣으십시오. 스크린 샷을 참조하십시오.

VBA 코드 : 회신 및 전달에 대해 서로 다른 서명 설정:

Public WithEvents GExplorer As Outlook.Explorer
Public WithEvents GMail As Outlook.MailItem
Public GFSO As Scripting.FileSystemObject
Public GTextStream As Scripting.TextStream
Public GText As String
Private Sub Application_Startup()
    Set GExplorer = Outlook.Application.ActiveExplorer
    Set GFSO = New Scripting.FileSystemObject
End Sub
Private Sub GExplorer_SelectionChange()
    Dim xItem As Object
    On Error Resume Next
    Set xItem = GExplorer.Selection.Item(1)
    If xItem.Class <> olMail Then Exit Sub
    Set GMail = xItem
End Sub
Private Sub GMail_Reply(ByVal Response As Object, Cancel As Boolean)
    InsertSignature Response, "Signature1.htm"   'change this signature name for replies
End Sub
Private Sub GMail_Forward(ByVal Forward As Object, Cancel As Boolean)
    InsertSignature Forward, " Signature2.htm"    'change this signature name for forwards
End Sub
Private Sub InsertSignature(Item As Object, SignName As String)
    Dim xSignatureFile As String
    Dim xMailItem As Outlook.MailItem
    xSignatureFile = CreateObject("WScript.Shell").SpecialFolders(5)
    xSignatureFile = xSignatureFile & "\Microsoft\Signatures\" & SignName
    Set GTextStream = GFSO.OpenTextFile(xSignatureFile)
    GText = ""
    GText = GTextStream.ReadAll
    If Item.Class <> olMail Then Exit Sub
    Set xMailItem = Item
    With xMailItem
        .Display
        .HTMLBody = .HTMLBody & "<br><br>" & GText
    End With
End Sub

주의 사항: 위 코드에서 서명 1 과 서명 2 회신 및 전달에 사용할 두 개의 서명 이름입니다. 필요에 따라 이름을 변경하십시오.

문서 시그 forwar 응답 1

3. 여전히 응용 프로그램 용 Microsoft Visual Basic 창을 클릭합니다 도구 > 참고자료 로 이동합니다 참조 -Project1 대화 상자 및 확인 Microsoft 스크립팅 런타임 옵션에서 사용 가능한 참조 목록 상자, 스크린 샷 참조 :

문서 시그 forwar 응답 2