So stellen Sie die Hintergrundfarbe neuer Termine in Ihrem Outlook ein

Wenn Sie einen neuen Termin erstellen, finden Sie im geöffneten Terminfenster keine direkte Option, mit der Sie die Hintergrundfarbe festlegen können. Wenn Sie also die Hintergrundfarbe neuer Termine voreinstellen möchten, können Sie die in diesem Abschnitt beschriebene Methode verwendenost

Wie Sie wissen, ist es recht einfach, die Hintergrundfarbe von E-Mails in Outlook zu ändern. Um genau zu sein, finden Sie im geöffneten Nachrichtenfenster eine Schaltfläche "Seitenfarbe" auf der Registerkarte "Optionen", wie im folgenden Screenshot gezeigt. Nachdem Sie darauf geklickt haben, können Sie Ihre Lieblingsfarbe für den Hintergrund auswählen.

Im Gegensatz zu E-Mails gibt es jedoch keine solche Funktion für Termine. Im geöffneten Terminfenster finden Sie nicht die Registerkarte "Optionen", ganz zu schweigen von der Schaltfläche "Seitenfarbe". Wenn Sie die Hintergrundfarbe eines Termins voreinstellen möchten, müssen Sie daher nach anderen Lösungen suchen. Im Folgenden stellen wir Ihnen eine Methode vor, die VBA verwendet. Wenn Sie mit VBA nicht vertraut sind, lesen Sie besser die Seiteost - "So führen Sie VBA-Code in Outlook aus".

Voreingestellte Hintergrundfarbe für neue Termine

1. Für astart Lösen Sie in Outlook den VBA-Editor über „Alt + F11“ aus.
2. Aktivieren Sie dann „MS Word Object Library Referenz “gemäß„So fügen Sie eine Objektbibliothek hinzurary Referenz in VBA".
3. Kopieren Sie als Nächstes den folgenden VBA-Code in das Projekt "ThisOutlookSession".

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

3. Bewegen Sie danach den Cursor in „Application_StarUnterprogramm tup ”.
4. Drücken Sie abschließend die Taste „F5“.
5. Wechseln Sie nun zum Outlook-Bereich "Kalender" und klicken Sie auf "Neuer Termin".
6. Sofort wird ein neuer Termin angezeigt, dessen Hintergrundfarbe geändert wurde, wie in der folgenden Abbildung dargestellt.

Ausweichen von Outlook-Datenverlust

Es wird davon ausgegangen, dass Sie nur ungern Schäden oder Verluste an Outlook-Daten erleiden müssen. Dementsprechend müssen Sie verschiedene Vorsichtsmaßnahmen treffen. Zum Beispiel ist es eine Notwendigkeit, eine konsistente und aktualisierte Sicherung zu erhalten. Außerdem müssen Sie wissen, wo sich das Tool zur Reparatur des Posteingangs befindet und wie es ausgeführt wird. Last but not least sollten Sie auch ein anderes erfahrenes PST-Reparaturwerkzeug von Drittanbietern aufbewahren, z DataNumen Outlook Repair. Es kann PST reparieren Probleme im Handumdrehen.

Einführung des Autors:

Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich beschädigtes mdf und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX