Slik forhåndsinnstiller du bakgrunnsfargen for nye avtaler i Outlook

Når du oppretter en ny avtale, finner du ikke et direkte alternativ i avtalevinduet som lar deg angi bakgrunnsfargen. Hvis du vil forhåndsinnstille bakgrunnsfargen for nye avtaler, kan du derfor bruke fremgangsmåten i dette innlegget.

Som du vet, er det ganske enkelt å endre bakgrunnsfargen på e-poster i Outlook. For å være spesifikk, i det åpnede meldingsvinduet, kan du finne en "Sidefarge"-knapp på "Alternativer"-fanen, som vist i følgende skjermbilde. Etter å ha klikket på den, kan du velge din favorittfarge for bakgrunnen.

"Sidefarge" i meldingsvinduet

Likevel, i motsetning til e-poster, finnes det ikke en slik funksjon for avtaler. I det åpne avtalevinduet finner du ikke fanen «Alternativer», for ikke å nevne knappen «Sidefarge». Derfor, hvis du vil forhåndsinnstille bakgrunnsfargen for en avtale, må du finne andre løsninger. Nå, i det følgende, skal vi dele en metode som bruker VBA. Hvis du ikke er kjent med VBA, bør du se innlegget – «Hvordan kjøre VBA-kode i Outlook".

Forhåndsinnstilt bakgrunnsfarge for nye avtaler

  1. For det første, i Outlook, utløs VBA-editoren via «Alt + F11».
  2. Aktiver deretter «MS Word Object Library Reference» som beskrevet i «Slik legger du til en objektbibliotekreferanse i VBA".
  3. Deretter kopierer du følgende VBA-kode til "ThisOutlookSession" -prosjektet.
Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objApptInspector As Outlook.Inspector

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

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is AppointmentItem Then
       Set objApptInspector = Inspector
    End If
End Sub

Private Sub objApptInspector_Activate()
    Dim objAppointment As Outlook.AppointmentItem
    Dim objApptDocument As Word.Document
 
    Set objAppointment = objApptInspector.CurrentItem
 
    'Work on new appointment
    If objAppointment.Subject = "" Then
       Set objApptDocument = objApptInspector.WordEditor
 
       'Change background color
       'Modify code as per your needs
       objApptDocument.Background.Fill.ForeColor.ObjectThemeColor = wdThemeColorAccent1
       objApptDocument.Background.Fill.ForeColor.TintAndShade = 0.8
       objApptDocument.Background.Fill.Visible = msoTrue
       objApptDocument.Background.Fill.Solid
    End If
End Sub

VBA-kode - Forhåndsinnstill bakgrunnsfargen for nye avtaler

  1. Flytt deretter markøren til underrutinen «Application_Startup».
  2. Til slutt trykker du på "F5"-tasten.
  3. Gå nå til "Kalender"-panelet i Outlook og klikk på "Ny avtale".
  4. Med en gang vil en ny avtale vises, hvis bakgrunnsfarge er endret, som vist i følgende figur.Bakgrunnsfarge i ny avtale

Unngå tap av Outlook-data

Det antas at du må være motvillig til å lide skade eller tap av Outlook-data. Følgelig er du pålagt å ta en rekke forholdsregler. For eksempel er det en nødvendighet å få tak i en konsistent og oppdatert sikkerhetskopi. I tillegg må du vite hvor reparasjonsverktøyet for innboks er plassert og hvordan du kjører det. Sist, men ikke minst, bør du også beholde et annet erfarent tredjeparts PST-reparasjonsverktøy, som DataNumen Outlook Repair. Det kan reparere PST problemer på et blunk.

Forfatterintroduksjon:

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

Kommentarer er stengt.