KutoolsforOffice — Eine Lösung, fünf leistungsstarke Tools.Mehr erreichen mit weniger Aufwand.März-Aktion: 20 % Rabatt

Wie deaktivieren Sie die Warnung bei fehlendem Betreff in Outlook?

AutorSiluvia Änderungsdatum

Wenn Sie Outlook 2010 und 2013 verwenden und E-Mail-Nachrichten ohne Betreff versenden, erscheint jedes Mal ein Hinweisfenster, das Sie daran erinnert. Falls Sie den Betreff wirklich nicht ausfüllen möchten, kann diese Warnung eine große Störung für Sie darstellen. Um Outlook-Nutzern dabei zu helfen, diese Warnung loszuwerden, stellen wir im folgenden Tutorial eine Methode vor.

Warnung bei fehlendem Betreff in Outlook deaktivieren


Warnung bei fehlendem Betreff in Outlook deaktivieren

In Outlook 2007 erhalten Sie keine Warnung, wenn Sie eine E-Mail ohne Betreff versenden – diese Funktion ist erst in Outlook 2010 und 2013 standardmäßig aktiviert. Allerdings gibt es keine integrierte Option, um die Warnung direkt zu deaktivieren. In diesem Tutorial zeigen wir Ihnen einen VBA-Code, mit dem Sie dies dennoch erreichen können.

1. Drücken Sie „Alt“ + „F11“, um das Dialogfeld „Microsoft Visual Basic for Applications“ zu öffnen.

2. Erweitern Sie „Project1“ > „Microsoft Outlook-Objekte“, indem Sie doppelt darauf klicken, und öffnen Sie anschließend durch Doppelklick auf „ThisOutlookSession“ das Fenster „VbaProject.OTM“.

Der Screenshot zum Deaktivieren der Warnung bei fehlendem Betreff in Outlook 1

3. Kopieren Sie den folgenden VBA-Code und fügen Sie ihn in das Fenster ein.

VBA: Warnung bei fehlendem Betreff deaktivieren

Option Explicit
Private WithEvents oInspectors As Outlook.Inspectors

Private Sub Application_Startup()
    Set oInspectors = Outlook.Inspectors
End Sub

Private Sub oInspectors_NewInspector(ByVal Inspector As Inspector)
    Dim oItem As Object
    On Error GoTo ExitProc
    Set oItem = Inspector.CurrentItem
    If oItem.Sent = False Then
        If oItem.Subject = "" Then oItem.Subject = " "
    End If
ExitProc:
    Set oItem = Nothing
    Set Inspector = Nothing
End Sub

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    On Error Resume Next
    Item.Subject = Trim(Item.Subject)
End Sub

Private Sub Application_Quit()
    Set oInspectors = Nothing
End Sub

4. Klicken Sie auf die Schaltfläche „Speichern“, um Ihren VBA-Code sicher zu speichern.

5. Starten Sie die Outlook-Anwendung neu.

Danach wird der VBA-Code aktiv: Wenn Sie eine Nachricht ohne Betreff versenden, erscheint das Warnfenster nicht mehr.

Hinweis: Stellen Sie sicher, dass die Option „Alle Makros aktivieren“ ausgewählt ist. (Überprüfen Sie dies, indem Sie nacheinander auf „Datei“ > „Optionen“ > „Vertrauensstellungscenter“ > „Vertrauensstellungscenter-Einstellungen“ klicken und im Dialogfeld „Vertrauensstellungscenter“ unter „Makroeinstellungen“ die Option „Alle Makros aktivieren“ aktivieren.) Siehe Screenshot:

Der Screenshot zum Deaktivieren der Warnung bei fehlendem Betreff in Outlook 2

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!

kutools for outlook features1kutools for outlook features2

🚀 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