Come impostare la data di inizio predefinita come oggi quando si crea una nuova attività in Outlook?
Quando creiamo una nuova attività in Outlook, l'attività con “Data di inizio” viene visualizzata con “Nessuna” come impostazione predefinita, come mostrato nello screenshot seguente. Tuttavia, a volte è necessario impostare frequentemente la data odierna come Data di inizio, quindi ogni volta bisogna selezionare manualmente la data nel campo “Data di inizio”. Esiste un modo rapido per impostare automaticamente la data di inizio predefinita come oggi quando si crea una nuova attività in Outlook?
Impostare la data di inizio predefinita come oggi quando si crea una nuova attività con il codice VBA in Outlook
Forse non esiste un altro buon metodo per gestire direttamente questa attività in Outlook; qui vi presenterò un codice VBA per risolvere il problema. Seguite i seguenti passaggi:
1. Avviate Outlook e poi tenete premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic for Applications.
2. Nella finestra di Microsoft Visual Basic for Applications, fate doppio clic su ThisOutlookSession nel riquadro Project1(VbaProject.OTM) per aprire la modalità, quindi copiate e incollate il seguente codice nel modulo vuoto.
Codice VBA: Imposta la data di inizio predefinita come oggi:
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. Dopo aver inserito il codice, posizionate il cursore nella seconda sezione del codice e premete il tasto F5 per eseguire il codice, vedere lo screenshot:
4. Da quel momento in poi, ogni volta che creerete una nuova attività, Outlook imposterà automaticamente la data di inizio e la data di fine alla data corrente per impostazione predefinita, come mostrato nello screenshot seguente:
I migliori strumenti per la produttività in Office
Ultime novità: Kutools per Outlook lancia la versione gratuita!
Scopri il nuovo Kutools per Outlook con oltre100 funzionalità incredibili! Clicca per scaricare ora!
📧 Automazione email: Risposta automatica (disponibile per POP e IMAP) / Programmazione invio email / CC/BCC automatico tramite regola durante l’invio dell’email / Inoltro automatico (Regola avanzata) / Aggiungi saluto automaticamente / Suddivisione automatica delle email con più destinatari in email individuali ...
📨 Gestione email: Richiama Email / Blocca email di truffa tramite Oggetto e altro / Elimina Email duplicate / Ricerca Avanzata / Organizza cartelle ...
📁 Allegati Pro: Salvataggio in batch / Distacco in batch / Compressione in batch / Salvataggio automatico / Distacca automaticamente / Auto Comprimi ...
🌟 Magia dell’interfaccia: 😊Più emoji belle e simpatiche / Ti avvisa quando arrivano email importanti / Minimizza Outlook invece di chiuderlo ...
👍 Meraviglie con un clic: Rispondi a Tutti con Allegati / Email Anti-phishing / 🕘Mostra il fuso orario del mittente ...
👩🏼🤝👩🏻 Contatti e Calendario: Aggiunta massiva dei contatti dalle email selezionate / Dividi un Gruppo di Contatti in gruppi individuali / Rimuovi promemoria di compleanno ...
Usa Kutools nella lingua che preferisci: supporta Inglese, Spagnolo, Tedesco, Francese, Cinese e oltre40 altre lingue!
