Come ritardare l'invio di un invito a una riunione in Outlook?
Normalmente, puoi applicare la funzione Ritardo Invio per inviare un messaggio in un momento specifico invece che subito. Tuttavia, a volte potresti voler ritardare l'invio di un invito a una riunione come faresti con un'email. Come potresti inviare un invito a una riunione all'ora desiderata in Outlook?
Ritardare l'invio di un invito a una riunione in Outlook con il codice VBA
Ritardare l'invio di un invito a una riunione in Outlook con il codice VBA
Forse non esiste un modo diretto per ritardare un invito a una riunione in Outlook, ma il seguente codice VBA può aiutarti, procedi come segue:
1. Per prima cosa, devi creare una nuova attività. Nella finestra Nuova Attività:
(1.) Specifica l'oggetto, la data di inizio e la data di fine della riunione;
(2.) Imposta una data e ora di promemoria quando vuoi inviare l'invito alla riunione;
(3.) Scrivi il messaggio della riunione come necessario.
2. Dopo aver creato l'attività, clicca sull'opzione Salva e chiudi per chiudere questa finestra.
3. Successivamente, tieni premuti i tasti ALT + F11 per aprire la finestra Microsoft Visual Basic for Applications.
4. Nella finestra Microsoft Visual Basic for Applications, fai doppio clic su ThisOutlookSession dal riquadro Project1(VbaProject.OTM) per aprire la modalità, quindi copia e incolla il seguente codice nel modulo vuoto.
Codice VBA: Ritardare l'invio di un invito a una riunione:
Private Sub Application_Reminder(ByVal Item As Object)
Dim xTaskItem As TaskItem
Dim xAppointmentItem As AppointmentItem
Dim xRcpArr() As String
If (Item.Class <> olTask) Or (LCase(Item.Subject) <> "Meeting test") Then
Exit Sub
End If
Set xTaskItem = Item
xRcpArr = VBA.Split("yy@addin99.com,sky@addin99.com,ruby@addin99.com", ",")
Set xAppointmentItem = Outlook.Application.CreateItem(olAppointmentItem)
With xAppointmentItem
.MeetingStatus = olMeeting
For i = 0 To UBound(xRcpArr)
.Recipients.Add (xRcpArr(i))
Next
.Subject = xTaskItem.Subject
.Location = "Office room 1002"
.Start = xTaskItem.StartDate + #2:00:00 PM#
.Body = xTaskItem.Body
.Duration = 120
.ReminderSet = True
.ReminderMinutesBeforeStart = 20
.Save
.Send
End With
xTaskItem.MarkComplete
Set xTaskItem = Nothing
End Sub
Nota: Nel codice sopra: Meeting test è l'oggetto che hai creato per la riunione al passo 1; inoltre, dovresti modificare le informazioni degli indirizzi dei destinatari, la posizione della riunione, l'ora di inizio e la durata della riunione con i tuoi dati.
5. Salva e chiudi il codice, quindi riavvia Outlook per rendere operativo questo codice.
6. Da adesso in poi, quando il promemoria dell'attività apparirà all'ora specificata, Outlook invierà automaticamente l'invito alla riunione.
I migliori strumenti per la produttività in Office
Ultime notizie: Kutools per Outlook lancia la versione gratuita!
Scopri il nuovissimo Kutools per Outlook con oltre100 funzionalità straordinarie! Clicca per scaricare ora!
📧 Automazione Email: Risposta automatica (disponibile per POP e IMAP) / Programma invio Email / CC/BCC automatico tramite Regola durante l’invio delle Email / Inoltro automatico (Regola avanzata) / Aggiungi Saluto automaticamente / Dividi automaticamente Email multi-destinatario in messaggi singoli ...
📨 Gestione Email: Richiama Email / Blocca Email fraudulent (tramite Oggetto e altri parametri) / Elimina Email Duplicato / Ricerca Avanzata / Organizza cartelle ...
📁 Allegati Pro: Salva in Batch / Distacca in Batch / Comprimi in Batch / Salvataggio automatico / Distacca automaticamente / Auto Comprimi ...
🌟 Magia Interfaccia: 😊Più emoji belle e divertenti / Notifiche per le email importanti in arrivo / Riduci Outlook al posto di chiuderlo ...
👍 Funzioni rapide: Rispondi a Tutti con Allegati / Email Anti-Phishing / 🕘Mostra il fuso orario del mittente ...
👩🏼🤝👩🏻 Contatti & Calendario: Aggiungi in Batch contatti dalle Email selezionate / Dividi un Gruppo di Contatti in Gruppi singoli / Rimuovi promemoria di compleanno ...
Utilizza Kutools nella lingua che preferisci – supporta Inglese, Spagnolo, Tedesco, Francese, Cinese e oltre40 altre!
🚀 Download con un solo clic — Ottieni tutti gli Add-in per Office
Consigliato: Kutools per Office (5-in-1)
Un solo clic per scaricare cinque installatori contemporaneamente — Kutools per Excel, Outlook, Word, PowerPoint e Office Tab Pro. Clicca per scaricare ora!
- ✅ Comodità con un solo clic: scarica tutti e cinque i pacchetti di installazione in una sola azione.
- 🚀 Pronto per qualsiasi attività Office: installa i componenti aggiuntivi necessari, quando ti servono.
- 🧰 Inclusi: Kutools per Excel / Kutools per Outlook / Kutools per Word / Office Tab Pro / Kutools per PowerPoint