Wie kann man das Standard-Startdatum beim Erstellen einer neuen Aufgabe in Outlook auf heute setzen?
Wenn wir eine neue Aufgabe in Outlook erstellen, wird die Aufgabe mit „Startdatum“ standardmäßig mit „Keines“ angezeigt, wie im folgenden Screenshot gezeigt. Manchmal möchten Sie jedoch häufig das heutige Datum als Startdatum festlegen und müssen jedes Mal manuell das Datum im Feld „Startdatum“ auswählen. Gibt es eine schnelle Möglichkeit, das Standard-Startdatum automatisch auf heute zu setzen, wenn Sie eine neue Aufgabe in Outlook erstellen?
Setzen Sie das Standard-Startdatum beim Erstellen einer neuen Aufgabe mit VBA-Code in Outlook auf heute
Möglicherweise gibt es keine andere gute Möglichkeit, diese Aufgabe direkt in Outlook zu lösen. Hier werde ich einen VBA-Code vorstellen, um dieses Problem zu beheben. Bitte folgen Sie den folgenden Schritten:
1. Starten Sie Outlook, und halten Sie dann die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie im Fenster Microsoft Visual Basic for Applications im Bereich Project1(VbaProject.OTM) doppelt auf ThisOutlookSession, um den Modus zu öffnen, und kopieren Sie dann den folgenden Code in das leere Modul.
VBA-Code: Standard-Startdatum auf heute setzen:
Public WithEvents xInspectors As Outlook.Inspectors
Public WithEvents xTaskItem As Outlook.TaskItem
Private Sub Application_Startup()
Set xInspectors = Outlook.Inspectors
End Sub
Private Sub xInspectors_NewInspector(ByVal Inspector As Inspector)
If Not (TypeOf Inspector.CurrentItem Is TaskItem) Then Exit Sub
Set xTaskItem = Inspector.CurrentItem
End Sub
Private Sub xTaskItem_Open(Cancel As Boolean)
If (Len(xTaskItem.Subject) = 0 And Len(xTaskItem.Body) = 0) And (xTaskItem.StartDate = #1/1/4501# And xTaskItem.DueDate = #1/1/4501#) Then
xTaskItem.StartDate = Now
End If
End Sub
3. Nachdem Sie den Code eingefügt haben, platzieren Sie den Cursor im zweiten Codeabschnitt und drücken Sie die F5-Taste, um diesen Code auszuführen, siehe Screenshot:
4. Von nun an wird Outlook jedes Mal, wenn Sie eine neue Aufgabe erstellen, automatisch das Startdatum und das Enddatum auf das aktuelle Datum setzen, wie im folgenden Screenshot gezeigt:
Beste Office-Produktivitätstools
Eilmeldung: Kutools für Outlook startet kostenlose Version!
Erleben Sie die brandneue kostenlose Version von Kutools für Outlook mit über70 unglaublichen Funktionen, die Sie FÜR IMMER nutzen können! Klicken Sie jetzt, um herunterzuladen!
📧 E-Mail-Automatisierung: Automatische Antwort (Verfügbar für POP und IMAP) / E-Mails senden planen / Automatische CC/BCC nach Regeln beim Senden von E-Mails / Automatische Weiterleitung (Erweiterte Regeln) / Automatische Begrüßung hinzufügen / Automatisches Aufteilen von E-Mails mit mehreren Empfängern in einzelne Nachrichten ...
📨 E-Mail-Management: E-Mails zurückrufen / Betrugs-E-Mails nach Betreff und anderen blockieren / Duplikate E-Mails löschen / Erweiterte Suche / Ordner organisieren ...
📁 Anhänge Pro: Stapelspeichern / Stapelablösen / Stapelkomprimieren / Automatisch speichern / Automatisch abtrennen / Automatische Komprimierung ...
🌟 Interface Magic: 😊Mehr hübsche und coole Emojis / Erinnern Sie, wenn wichtige E-Mails kommen / Outlook minimieren statt schließen ...
👍 Ein-Klick-Wunder: Allen mit Anhängen antworten / Anti-Phishing-E-Mails / 🕘Zeitzone des Absenders anzeigen ...
👩🏼🤝👩🏻 Kontakte & Kalender: Kontakte aus ausgewählten E-Mails stapelweise hinzufügen / Eine Kontaktgruppe in einzelne Gruppen aufteilen / Geburtstagserinnerung entfernen ...
