Slik åpner du mottatte/sendte e-poster i "Rediger"-modus automatisk med Outlook VBA

For å endre brødteksten til en mottatt eller sendt e-post i Outlook, må du åpne den og deretter slå den inn i "Rediger"-modus. Hvis du ofte trenger å gjøre endringer i slike e-poster, vil du automatisk åpne dem i "Rediger"-modus. Denne post vil hjelpe deg å få det.

Noen ganger kan det hende du må endre innholdet i en mottatt eller sendt e-post i Outlook. I dette scenariet, som introdusert i forrige sideost - "Hvordan endre emnet og hoveddelen av mottatte e-poster i Outlook", må du åpne e-posten og klikke på "Handlinger"-knappen og velge "Rediger melding" for å konvertere e-posten til "Rediger" -modus. Imidlertid kan du synes det fortsatt er litt plagsomt. Derfor ønsker du at Outlook alltid skal åpne mottatte/sendte e-poster i "Rediger"-modus. Deretter vil vi introdusere hvordan du bruker VBA-kode for å oppnå denne funksjonen. Les nå for å få detaljerte trinn.

Åpne mottatte/sendte e-poster i "Rediger"-modus automatisk

1. Helt i begynnelsen, med henvisning til "Hvordan kjøre VBA-kode i Outlook", få tilgang til Outlook VBA-editor.
2. Deretter kopierer og limer du inn følgende VBA-kode i "ThisOutlookSession" -prosjektet.

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. Etterpå klikker du på "Application_Startup" makro og trykk "F5"-tasten.
4. For øyeblikket lukker du VBA-editoren.
5. Endelig kan du prøve. Bare dobbeltklikk på en mottatt eller sendt e-post for å åpne den. Det vil sikkert i "Rediger" -modus.

Immun mot tap av Outlook-data

Har PST-filen din noen gang blitt utilgjengelig? I virkeligheten kan Outlook PST-filen lett bli ødelagt. For eksempel kan e-postbårne virus lett føre til Outlook-krasj og dermed føre til korrupsjon av Outlook-data. I slike tilfeller kan det være den første løsningen du tenker på verktøy for reparasjon av innboks. Men generelt sett er den ikke i stand til å håndtere slike alvorlige situasjoner. Derfor er det alltid foreslått å sikkerhetskopiere PST-filer med jevne mellomrom, slik at du kan gjenopprette PST-data fra sikkerhetskopier som en kork. Ellers må du falle tilbake på et spesialisert eksternt verktøy, som DataNumen Outlook Repair.

Forfatterintroduksjon:

Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert mdf gjenoppretting og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med