Sådan fjernes automatisk præfikset “RE” eller “FW” i emne, når du besvarer eller videresender e-mails

Når du prøver at besvare eller videresende e-mails ved at trykke på “Svar”, “Besvar alle” eller “Videresend” -knappen, skal der være tilføjet “RE” eller “FW” foran e-mail-emnet. Denne artikel fortæller dig, hvordan du kan lade Outlook automatisk fjerne dem med VBA.

I vores gennemtrængelige artikel - “2 Metoder til at videresende Outlook-e-mails uden "FW" -præfiks i emne”, Kan du få to løsninger til at videresende e-mails uden“ FW ”. De sender e-mails igen og opretter henholdsvis et "Fremad" hurtigt skridt. Det er indlysende, at begge ikke kan tillade, at du automatisk fjerner "FW", hvis du bruger den normale "Frem" -knap i "Svar" -gruppen.

Derfor skal du som standard, hvis du ønsker at fjerne præfikset “RE” eller “FW”, når du klikker på “Svar”, “Besvar alle” eller “Videresend” -knappen, manuelt hver gang. Det vil være ret besværligt. Heldigvis kan du bruge Outlook VBA til automatisk at fjerne de specifikke ord i postemnet. Læs videre for at opnå de detaljerede koder og trin.

Fjern automatisk præfikset “FW” eller “RE”, når du videresender eller besvarer e-mails

1. For at starte skal du åbne Outlook og gå til fanen "Udvikler".
2. Derefter kan du finde og klikke på “Visual Basic” -knappen.
3. Næste i det nye vindue skal du dobbeltklikke på projektet “ThisOutlookSession”.
4. Derefter skal du kopiere og indsætte følgende 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. Derefter skal du underskrive et digitalt certifikat til denne makro.
6. Senere kan du forlade vinduet “Visual Basic” og konfigurere Outlook til kun at aktivere de digitalt signerede makroer.
7. Endelig kan du prøve.

• For det første skal du vælge en e-mail og trykke på "Svar", "Svar alle" eller "Videresend" -knappen
• Derefter åbnes den besvarende eller videresendende besked. Du kan komponere posten som normalt.
• Når du klikker på “Send” -knappen, modtager du et meddelelsesfelt som følgende skærmbillede:
• Hvis du vælger “Ja”, fjernes præfikset “RE” eller “FW” automatisk. Hvis du vælger “Nej”, fjernes ikke præfikset.

Hvad man ikke skal gøre i forbindelse med Outlook-e-mails

Outlook er sårbart, så du skal være forsigtig, når du håndterer Outlook-mails. For eksempel, hvis du modtager e-mails fra ukendte kilder, skal du hellere ikke åbne den, for ikke at nævne klikke på de integrerede links eller downloade de vedhæftede filer. Denne form for e-mails kan indeholde ondsindede makroer, vira eller malware, som kan ødelægge dine Outlook-data med det samme. Det betyder, at du vil lide Outlook filskader. På det tidspunkt er din unikke udvej at anvende et kraftfuldt og velrenommeret reparationsværktøj, som f.eks DataNumen Outlook Repair.

Forfatter Introduktion:

Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder reparation korrupt mdf db og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com