Wie ändert man den Standardstatus für ganztägige Termine in Outlook auf „Beschäftigt“?

Standardmäßig legt Outlook den Status einer Besprechung auf „Beschäftigt“ fest, bei ganztägigen Terminen jedoch auf „Frei“ (siehe Screenshot unten). Jedes Mal, wenn Sie einen ganztägigen Termin erstellen, müssen Sie den Kalenderstatus manuell von „Als verfügbar anzeigen“ auf „Beschäftigt“ ändern. Damit künftig ganztägige Termine standardmäßig als „Beschäftigt“ angezeigt werden, stellt Ihnen dieser Artikel zwei Methoden vor.

Ganztägigen Terminstandard auf „Beschäftigt“ mithilfe eines benutzerdefinierten Formulars ändern

Mit einem benutzerdefinierten Formular können Sie ganz einfach einen ganztägigen Termin erstellen und dabei den Standardstatus von „Als verfügbar anzeigen“ auf „Beschäftigt“ ändern. Gehen Sie dazu wie folgt vor:

1. Wechseln Sie zur Kalenderansicht, und klicken Sie auf „Start“ > „Termin“.

2. Klicken Sie im Fenster „Termin“ auf „Entwickler“ > „Dieses Formular entwerfen“.

Tipp: Falls die Registerkarte „Entwickler“ nicht im Menüband angezeigt wird, befolgen Sie bitte die Anleitungen in diesem Artikel, um sie einzublenden.

3. Daraufhin wechselt das Terminfenster in den Entwurfsmodus. Klicken Sie nun auf die Registerkarte „(P.2)“.

4. Ziehen Sie das Feld „Ganztägiger Termin“ und das Feld „Beschäftigungsstatus“ separat aus dem Bereich „Feldauswahl“ auf die Arbeitsfläche unter der Registerkarte „(P.2)“.

5. Klicken Sie mit der rechten Maustaste auf das gezogene Feld „Ganztägiger Termin“ und wählen Sie im Kontextmenü „Eigenschaften“.

6. Konfigurieren Sie im Dialogfeld „Eigenschaften“ Folgendes:

7. Klicken Sie mit der rechten Maustaste auf das Kombinationsfeld des Feldes „Beschäftigungsstatus“ und wählen Sie im Kontextmenü „Eigenschaften“.

8. Konfigurieren Sie im Dialogfeld „Eigenschaften“ Folgendes:

9. Klicken Sie im Menüband auf „Veröffentlichen“ > „Formular veröffentlichen als“.

10. Führen Sie im Dialogfeld „Formular veröffentlichen als“ die folgenden Schritte aus:

11. Schließen Sie das Terminfenster, ohne Ihre Änderungen zu speichern.

12. Wenn Sie ab sofort ganztägige Termine nicht mehr mit dem Standardstatus „Als verfügbar anzeigen“, sondern als „Beschäftigt“ erstellen möchten, wechseln Sie zur Kalenderansicht und klicken Sie auf „Start“ > „Neue Elemente“ > „Benutzerdefinierte Formulare“ > „Name des benutzerdefinierten Formulars“.

Hinweis: Um einen ganztägigen Termin mit dem Standardstatus „Als verfügbar anzeigen“ als „Frei“ zu erstellen, gehen Sie wie gewohnt vor: Klicken Sie auf „Start“ > „Termin“ und aktivieren Sie anschließend im Fenster „Termin“ das Kontrollkästchen „Ganztägiger Termin“.

Ganztägigen Terminstandard auf „Beschäftigt“ mithilfe von VBA ändern

Die obige Methode umfasst zu viele Schritte. Wenn Sie regelmäßig ganztägige Termine mit dem Standardstatus „Als verfügbar anzeigen“ auf „Beschäftigt“ setzen müssen, hilft Ihnen der folgende VBA-Code, dies ganz einfach zu erledigen.

1. Starten Sie Outlook und drücken Sie gleichzeitig die Tasten „Alt“ + „F11“, um das Fenster „Microsoft Visual Basic for Applications“ zu öffnen.

2. Doppelklicken Sie im Fenster „Microsoft Visual Basic for Applications“ auf „Projekt1“ > „Microsoft Outlook-Objekte“ > „ThisOutlookSession“, um das Codefenster „ThisOutlookSession (Code)“ zu öffnen, und fügen Sie anschließend den folgenden Code in dieses Fenster ein.

VBA-Code: Standardstatus für ganztägige Termine auf „Beschäftigt“ festlegen

Public WithEvents GInspectors As Inspectors
Public WithEvents GAppointmentItem As AppointmentItem

Private Sub Application_Startup()
'Updated by Extendoffice 20220413
  Set GInspectors = Application.Inspectors
End Sub

Private Sub GInspectors_NewInspector(ByVal Inspector As Inspector)
  Select Case Inspector.CurrentItem.Class
    Case olAppointment
      Set GAppointmentItem = Inspector.CurrentItem
  End Select
End Sub

Private Sub GAppointmentItem_Open(Cancel As Boolean)
  Select Case GAppointmentItem.AllDayEvent
    Case True
      GAppointmentItem.BusyStatus = olBusy
  End Select
End Sub

Private Sub GAppointmentItem_PropertyChange(ByVal Name As String)
  If Name = "AllDayEvent" Then
    Select Case GAppointmentItem.AllDayEvent
      Case True
        GAppointmentItem.BusyStatus = olBusy
    End Select
  End If
End Sub

3. Speichern Sie den VBA-Code und starten Sie Outlook neu.

Ab sofort wird der Status „Als verfügbar anzeigen“ nach der Umwandlung eines Termins oder einer Besprechung in einen ganztägigen Termin standardmäßig auf „Beschäftigt“ gesetzt.

Verwandte Artikel

---

Beste Office-Produktivitätswerkzeuge

Erleben Sie das komplett neue Kutools für Outlook mit 100+ unglaublichen Funktionen!Jetzt zum Download klicken!

🤖KUTOOLS AI:Nutzt fortschrittliche KI-Technologie, um E-Mails mühelos zu verwalten – einschließlich Beantworten, Zusammenfassen, Optimieren, Erweitern, Übersetzen und Verfassen von E-Mails.

📧E-Mail-Automatisierung: Automatische Antworten (verfügbar für POP und IMAP) / E-Mails zeitgesteuert versenden / Beim Senden automatisch CC/BCC basierend auf Regeln hinzufügen / Automatische Weiterleitung (Erweiterte Regeln) / Automatische Grußformel einfügen / Mehrfachadressierte E-Mails automatisch in Einzelnachrichten aufteilen …

📨E-Mail-Verwaltung: E-Mails zurückrufen, Betrugs-E-Mails anhand von Betreffzeilen und weiteren Kriterien blockieren, doppelte E-Mails löschen, Erweiterte Suche, Ordner organisieren …

📁Anhänge Pro: Stapelweise speichern / Stapelweise lösen / Stapelweise komprimieren / Automatisch speichern / Automatisch abtrennen / Automatische Komprimierung …

🌟Oberflächenzauber:😊Noch mehr hübsche und coole Emojis/Benachrichtigung bei wichtigen eingehenden E-Mails/Outlook minimieren statt schließen...

👍Ein-Klick-Wunder: Allen mit Anhängen antworten / Anti-Phishing-E-Mails / 🕘Aktuelle Uhrzeit der Absender-Zeitzone anzeigen...

👩🏼‍🤝‍👩🏻Kontakte & Kalender:Stapelweise Kontakte aus ausgewählten E-Mails hinzufügen/Eine Kontaktgruppe in einzelne Kontakte aufteilen/Geburtstagserinnerung entfernen...

Nutzen Sie Kutools in Ihrer bevorzugten Sprache – mit Unterstützung für Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über 40 weitere Sprachen!

Kutools für Outlook mit nur einem Klick sofort freischalten! Warten Sie nicht – laden Sie jetzt herunter und steigern Sie Ihre Effizienz!

Funktionsliste von Kutools für Outlook      Jetzt herunterladen      Zum Kauf gehen

🚀 Ein-Klick-Download – Holen Sie sich alle Office-Add-Ins

Stark empfohlen: Kutools for Office (5-in-1)

Mit einem Klick fünf Installationsprogrammegleichzeitig herunterladen –Kutools für Excel, Outlook, Word, PowerPointund Office Tab Pro.Jetzt zum Download klicken!

• ✅Ein-Klick-Komfort: Laden Sie alle fünf Installationspakete mit nur einem Klick herunter.
• 🚀Bereit für jede Office-Aufgabe: Installieren Sie die Add-Ins, die Sie brauchen – genau dann, wenn Sie sie benötigen.
• 🧰Enthalten: Kutools für Excel / Kutools für Outlook / Kutools für Word / Office Tab Pro / Kutools for PowerPoint

Über das Paket⬇ Das Paket herunterladen💳 Das Paket kaufen