Hvordan tilpasse flaggtekstene i flaggede elementer i Outlook

Når du flagger et element, er standard flaggtekst "Oppfølging". Hvis du vil tilpasse den, kan du lese denne artikkelen. Her skal vi lære deg å bruke VBA for å realisere det.

Som standard, når du flagger et element, er notatet "Oppfølging". Hvis du vil endre det, må du velge "Egendefinert" flaggalternativ og deretter skrive inn ønsket tekst i popup-dialogboksen. Hvis du ofte trenger å tilordne en spesifikk tilpasset flaggtekst, vil du garantert mislike metoden ovenfor ved at den er for plagsom. Derfor deler vi her en smart metode. Det vil direkte tilpasse flaggtekstene til din smak. Les nå for å få detaljerte trinn.

Tilpass flaggtekstene i flaggede elementer

1. For å begynne, endre makroinnstillingene i henhold til «Hvordan kjøre VBA-kode i Outlook".
2. Trykk deretter "Alt + F11" for å få tilgang til VBA-editor.
3. Deretter åpner du "ThisOutlookSession" -prosjektet og limer inn følgende kode.

Public WithEvents objExplorer As Outlook.Explorer
Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objMail As Outlook.MailItem

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

Private Sub objExplorer_SelectionChange()
    On Error Resume Next
    If objExplorer.Selection.Item(1).Class = olMail Then
       Set objMail = objExplorer.Selection.Item(1)
    End If
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If Inspector.currentItem.Class = olMail Then
       Set objMail = Inspector.currentItem
    End If
End Sub

Private Sub objMail_PropertyChange(ByVal Name As String)
    Dim strFlagRequest As String
 
    If Name = "FlagStatus" Then
       If objMail.IsMarkedAsTask = True Then
          If objMail.FlagStatus <> olFlagComplete And objMail.FlagStatus <> olNoFlag Then
             'Enter your preferred note
             objMail.FlagRequest = "Custom Flag texts"
             objMail.Save
         End If
       End If
    End If
End Sub

4. Deretter starter du Outlook på nytt for å aktivere denne makroen.
5. Endelig kan du prøve.

• Først av alt, velg eller åpne et Outlook-element.
• Deretter flagger du det som vanlig.
• Med en gang vil du se de egendefinerte flaggtekstene som er tildelt dette elementet, som vist i følgende figur.

Hva hvis PST-filen blir utilgjengelig

Det har blitt bevist at Outlook-filen er utsatt for korrupsjon på grunn av ulike faktorer. For eksempel, hvis du ofte lukker Outlook-applikasjonen på feil måte, eller du ved et uhell laster ned de ondsinnede vedleggene, kan PST-filen være ødelagt. På den tiden er din første utvei å bruke det innebygde reparasjonsverktøyet – Scanpst. Likevel, hvis det mislykkes, har du ikke noe annet valg enn å gå tilbake til et mer profesjonelt eksternt verktøy, som DataNumen Outlook Repair, som har blitt verdsatt mye på grunn av sin høye PST gjenoppretting sats.

Forfatterintroduksjon:

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