So antworten Sie mit einer Standardvorlage, während Sie den Namenswert ersetzen

1461
BaconJuice

Ich frage mich, ob das überhaupt möglich ist? Ich habe E-Mails, die ich mit der folgenden Nachricht erhalten habe

Hello NAME,  Your request has been completed.  Thank you.

Gibt es eine Möglichkeit für mich, diesen Vorgang mit einem Klick zu automatisieren? Gibt es auch eine Möglichkeit für mich, den Namen mit dem Absendernamen zu füllen? Derzeit wird der Absendername im Feld "Von" wie folgt angezeigt: Nachname, Vorname. Ich möchte die NAME-Variable meiner Nachricht durch den FirstName-Wert ersetzen.

Ich frage mich, ob dies mit Outlook 2003 möglich ist?

Jede Hilfe wäre sehr dankbar.

Vielen Dank.

0

1 Antwort auf die Frage

0
niton

Speichern Sie eine Vorlagendatei mit Ihrem Text. Im Code wird es auf Laufwerk C gespeichert und heißt NamePlaceholder.oft. Ändern Sie nach Bedarf.

Öffnen Sie eine Anforderung, bevor Sie den Code ausführen.

Sub CreateReplyFromTemplate()  Dim currItem As Outlook.mailItem Dim currItemReply As Outlook.mailItem Dim myItem As Outlook.mailItem  Dim commaPositionRight As Long Dim Firstname As String  Set currItem = ActiveInspector.currentItem Set currItemReply = currItem.Reply Set myItem = Application.CreateItemFromTemplate("C:\NamePlaceholder.oft")  myItem.To = currItemReply.To commaPositionRight = InStrRev(myItem.To, ",") Firstname = Right(myItem.To, commaPositionRight)  myItem.Subject = currItem.Subject  ' if "RE:" or "FW:" on the request, ' and the client replies there would be an extra "RE:" or "FW:" If InStr(myItem.Subject, "RE: ") = 1 Or InStr(myItem.Subject, "FW: ") = 1 Then myItem.Subject = Right(myItem.Subject, Len(myItem.Subject) - 4) End If  myItem.HTMLBody = myItem.HTMLBody & currItemReply.HTMLBody myItem.HTMLBody = Replace(myItem.HTMLBody, "NAME", Firstname)  currItemReply.Close olDiscard currItem.Close olDiscard  myItem.Display  Set currItemReply = Nothing Set myItem = Nothing Set currItem = Nothing  End Sub

Wenn Sie mit VBA nicht vertraut sind, finden Sie hier http://www.slipstick.com/developer/how-to-use-outlooks-vba-editor/

Verwandte Probleme