Quando si invia nuovamente o si inoltra un'e-mail, è consigliabile non salvarne una copia nella cartella Posta inviata. Questo articolo ti insegnerà come configurare Outlook per richiedere il salvataggio di una copia o meno con Outlook VBA.
In realtà, per la maggior parte delle email comuni, è preferibile salvare una copia nella cartella Posta inviata. Tuttavia, in alcune situazioni, ad esempio quando si reinvia o si inoltra un'email o quando questa contiene un allegato di grandi dimensioni, potrebbe non essere necessario conservarne una copia. In questi casi, è opportuno che Outlook offra una soluzione che permetta di scegliere.
Soluzione alternativa: utilizzare l'opzione "Non salvare".
In realtà, Outlook non ha questa funzione. Ma puoi usare una soluzione alternativa. Questa è l'opzione "Non salvare" nella finestra del messaggio. Puoi accedervi passando alla scheda "Opzioni" e quindi facendo clic sul pulsante "Salva elemento inviato in", come nella seguente schermata:

Per un accesso più facile a questa opzione, puoi aggiungerla alla barra di accesso rapido. Fai clic con il pulsante destro del mouse e scegli "Aggiungi alla barra di accesso rapido" dal menu a comparsa.
D'ora in poi, se non si desidera salvare una copia, è sufficiente selezionare la casella di controllo accanto all'opzione "Non salvare" nella barra di accesso rapido. Sebbene questo metodo sia indubbiamente comodo, molti utenti lamentano di dimenticare spesso di selezionare la casella di controllo. Pertanto, desiderano ancora una finestra di dialogo di Outlook che chieda se si desidera salvare una copia. Per ottenere questo risultato, è necessario utilizzare Outlook VBA. Continuate a leggere per scoprire i codici e i passaggi dettagliati.
VBA: chiedi se salvare o meno una copia durante l'invio di e-mail
- In primo luogo, avvia Outlook e passa alla scheda "Sviluppatore".
- Quindi fare clic sul pulsante "Visual Basic", che farà apparire una nuova finestra.
- Nella finestra "Visual Basic", fare doppio clic su "ThisOutlookSession" per aprire la finestra del progetto "ThisOutlookSession".
- Quindi copia e incolla i seguenti codici al suo interno.
Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim strMsg As String
Dim nRes As Integer
strMsg = "Do you want to save a copy of this message?"
nRes = MsgBox(strMsg, vbYesNo + vbQuestion, "Confirm Saving Copy")
If nRes = vbNo Then
Item.DeleteAfterSubmit = True
End If
End Sub
- Successivamente, dovresti firmare questo codice come al solito e modificare le impostazioni della macro per abilitare solo le macro con firma digitale.
- Alla fine, puoi provare. Quando fai clic sul pulsante "Invia", riceverai un avviso di Outlook, come l'immagine seguente. Se si seleziona il pulsante "No", il messaggio corrente non verrà salvato nella cartella Posta inviata. Mentre se premi il pulsante "Sì", questo messaggio verrà salvato.
Affrontare problemi frequenti di Outlook
Come altre applicazioni, Outlook può subire vari problemi, come arresti anomali improvvisi, mancata risposta, messaggi di errore occasionali e così via. Quindi, se sei un utente abituale di Outlook, faresti meglio a procurarti un file Strumento di riparazione file di Outlook, piace DataNumen Outlook Repair in quanto tornerà utile quando scopri che il tuo file di Outlook è danneggiato per alcuni motivi sconosciuti.
Introduzione dell'autore:
Shirley Zhang è un'esperta di recupero dati in DataNumen, Inc., che è il leader mondiale nelle tecnologie di recupero dati, tra cui riparazione SQL Server corruzione del database mdf e prodotti software di riparazione di Outlook. Per maggiori informazioni visita www.datanumen.com


