☰

送信者ではなく本文でメールに返信する Outlook ルール

tag-icon • tag-icon email microsoft-outlook-2010 rules
送信者ではなく本文でメールに返信する Outlook ルール

実際の送信者に返信するのではなく、メールの本文に返信するルールを Outlook で設定できるかどうか知りたいです。

当社のデータベースに登録したい人からのメールは、ウェブサイトを通じて受信されますが、すべてのメールは同じメールアドレス（自動応答、ウェブサイトを管理する会社）から送信されており、登録をリクエストしている人々のメールアドレスを含む詳細はすべてテキスト本文に記載されています。

返信をどのメールに送信するかを選択するオプションがあるかどうか知りたいのですが。

Outlook 2010を使用しています

ご協力ありがとうございます、サラ

答え1

メールは明確ですが、詳細が欠けています。どこメールには、本文に書いてあります。ただし、それだけでは役に立ちません。そこで、簡単に理解できるデモ用のモックアップを作成しました。

受信した電子メールが次の形式であると仮定します。

拝啓、

以下の詳細を受け取りました

メールアドレス: myEmail@domain 電話: 12345

ご連絡させていただきます

署名した

次のVBaコードは電子メールアドレスを見つけ、このアドレスを宛先フィールドに入力した新しい電子メールを開きます。

Sub MailItemContent2()
    Dim olItem As Outlook.MailItem
    Dim sText As String
    Dim sEmail As String
    Dim emailWords() As String
    Set olItem = ActiveExplorer.Selection.Item(1)
    sText = Replace(olItem.Body, vbCrLf, " ")
    emailWords = Split(sText, " ")
    Dim i As Integer
    Dim emailIndex As Integer
    emailIndex = -99
    isNext = False
    For i = 0 To UBound(emailWords)

        If (emailIndex = i) Then
           sEmail = Split(emailWords(i), Chr(34))(2)
           Exit For
        End If

        If emailWords(i) = "Email:" Then
            emailIndex = i + 2
        End If

    Next i

    Set objMsg = Application.CreateItem(olMailItem)

 With objMsg
  .To = sEmail
  '.CC = "[email protected]"
  '.BCC = "[email protected]"
  '.Subject = "The subject"
  '.Categories = "Test"
  '.VotingOptions = "Yes;No;Maybe;"
  '.BodyFormat = olFormatPlain
  '.Importance = olImportanceHigh
  '.Sensitivity = olConfidential


  .Display
End With

Set objMsg = Nothing        

End Sub

関連情報