Hur man tar bort prefixet “RE” eller “FW” i ämne när du svarar eller vidarebefordrar e-post

När du försöker svara eller vidarebefordra e-postmeddelanden genom att trycka på "Svara", "Svara alla" eller "Vidarebefordra" -knappen måste "RE" eller "FW" -prefixet läggas till framför e-postens ämne. Den här artikeln berättar hur du låter Outlook ta bort dem automatiskt med VBA.

I vår genomträngande artikel - “2 metoder för att vidarebefordra Outlook-e-post utan "FW" -prefix i ämne”, Kan du få två lösningar för att vidarebefordra e-post utan“ FW ”. De skickar e-postmeddelandena igen och skapar ett "Framåt" snabbt steg. Det är uppenbart att båda inte kan tillåta dig att automatiskt ta bort "FW" om du använder den normala "Framåt" -knappen i "Svara" -gruppen.

Om du vill ta bort prefixet “RE” eller “FW” i ämnet när du klickar på “Svara”, “Svara alla” eller “Vidarebefordra” -knappen måste du som standard ta bort dem manuellt varje gång. Det blir ganska besvärligt. Lyckligtvis kan du använda Outlook VBA för att automatiskt ta bort de specifika orden i postens ämne. Läs vidare för att uppnå detaljerade koder och steg.

Ta bort prefixet “FW” eller “RE” automatiskt när du vidarebefordrar eller svarar på e-post

1. Till att börja med, starta Outlook och gå till fliken "Utvecklare".
2. Sedan kan du hitta och klicka på “Visual Basic” -knappen.
3. Nästa i det nya fönstret bör du dubbelklicka på projektet “ThisOutlookSession”.
4. Därefter måste du kopiera och klistra in följande VBA-koder i den.

Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim strSubject As String
 
    If InStr(Item.Subject, "RE") > 0 Then
       'If you don't want the prompt,
       'You can remove the MsgBox line and its correspoding "Else … End If" lines.
       If MsgBox("Do you want to remove the prefix 'RE'?", vbYesNo) = vbYes Then
          strSubject = Replace(Item.Subject, "RE:", "", vbTextCompare)
       Else
          strSubject = Item.Subject
       End If
    End If
 
    If InStr(Item.Subject, "FW") > 0 Then
       If MsgBox("Do you want to remove the prefix 'FW'?", vbYesNo) = vbYes Then
          strSubject = Replace(Item.Subject, "FW:", "", vbTextCompare)
       Else
          strSubject = Item.Subject
       End If
    End If
 
    Item.Subject = Trim(strSubject)
    Item.Save
End Sub

5. Därefter bör du underteckna ett digitalt certifikat till detta makro.
6. Senare kan du stänga fönstret “Visual Basic” och konfigurera Outlook så att endast de digitalt signerade makron aktiveras.
7. Äntligen kan du prova.

• Välj först ett e-postmeddelande och tryck på "Svara", "Svara alla" eller "Vidarebefordra" -knappen
• Då öppnas svaret eller vidarebefordran. Du kan komponera posten som vanligt.
• När du klickar på knappen "Skicka" får du en meddelandefält, som följande skärmdump:
• Om du väljer “Ja” tas prefixet “RE” eller “FW” bort automatiskt. Om du väljer “Nej” tas inte prefixet bort.

Vad man inte ska göra när man hanterar Outlook-e-postmeddelanden

Outlook är sårbart, så du bör vara försiktig när du hanterar Outlook-e-post. Om du till exempel får e-post från okända källor, borde du inte öppna den, för att inte tala om klicka på de inbäddade länkarna eller ladda ner bifogade filer. Den här typen av e-postmeddelanden kan innehålla skadliga makron, virus eller skadlig kod, vilket snabbt kan förstöra dina Outlook-data. Det betyder att du kommer att lida Outlook-filskada. Vid den tiden är din unika utväg att använda ett kraftfullt och ansedd reparationsverktyg, som DataNumen Outlook Repair.

Författarintroduktion:

Shirley Zhang är expert på dataåterställning DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive reparera korrupta mdf db och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com