Sådan åbner du modtagne/sendte e-mails i "Rediger"-tilstand automatisk med Outlook VBA

For at ændre brødteksten af ​​en modtaget eller sendt e-mail i Outlook, skal du åbne den og derefter vende den til "Rediger"-tilstand. Hvis du ofte har brug for at foretage ændringer i sådanne e-mails, vil du automatisk åbne dem i "Rediger"-tilstand. Denne sost vil hjælpe dig med at få det.

Til tider skal du muligvis ændre indholdet af en modtaget eller sendt e-mail i Outlook. I dette scenarie, som introduceret i forrige sost - "Sådan ændres emnet og brødteksten for modtagne e-mails i Outlook", skal du åbne e-mailen og klikke på knappen "Handlinger" og vælge "Rediger besked" for at konvertere e-mailen til "Rediger" -tilstand. Du kan dog synes, at det stadig er lidt besværligt. Derfor ønsker du, at Outlook altid åbner modtagne/sendte e-mails i "Rediger"-tilstand. Derefter vil vi introducere, hvordan man bruger VBA-kode til at opnå denne funktion. Læs nu videre for at få detaljerede trin.

Åbn modtagne/sendte e-mails i "Rediger"-tilstand automatisk

1. Allerede i begyndelsen, med henvisning til "Sådan køres VBA-kode i din Outlook“, få adgang til Outlook VBA-editor.
2. Kopier og indsæt derefter følgende VBA-kode i projektet "ThisOutlookSession".

Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objMailInspector As Outlook.Inspector

Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

'Get the email window
Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is MailItem Then
       Set objMailInspector = Inspector
    End If
End Sub

Private Sub objMailInspector_Activate()
    Dim objMail As Outlook.MailItem
 
    Set objMail = objMailInspector.CurrentItem
    'If it is a recieved/sent mail instead of a new email
    If Not (objMail.Recipients Is Nothing) And Not (objMail.Sender Is Nothing) Then
       'open in "Edit" mode
       objMailInspector.CommandBars.ExecuteMso ("EditMessage")
    End If
End Sub

3. Klik derefter på "Application_Startup" makro og tryk på "F5" tasten.
4. I øjeblikket skal du lukke VBA-editoren.
5. Endelig kan du prøve. Du skal blot dobbeltklikke på en modtaget eller sendt mail for at åbne den. Det vil helt sikkert i "Rediger"-tilstand.

Immun mod tab af Outlook-data

Er din PST-fil nogensinde blevet utilgængelig? I virkeligheden kan Outlook PST-fil nemt blive korrupt. For eksempel kan e-mail-bårne vira nemt føre til Outlook-nedbrud og derved resultere i korruption af Outlook-data. I sådanne tilfælde kan den første løsning, der sker i dit sind, være værktøj til reparation af indbakke. Men generelt set er den ikke i stand til at håndtere så alvorlige situationer. Derfor foreslås det altid at sikkerhedskopiere PST-filer med jævne mellemrum, så du kan gendanne PST-data fra sikkerhedskopier som en prop. Ellers skal du falde tilbage på et specialiseret eksternt væ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 mdf opsving og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com