Come aggiungere automaticamente un saluto personalizzato alle risposte in Outlook?
Di solito, quando si risponde a un messaggio di posta elettronica in Outlook, è necessario inserire manualmente il saluto. Tuttavia, il messaggio originale contiene già informazioni utili sul destinatario, come il nome del mittente. In questo articolo ti mostrerò due metodi per aggiungere automaticamente un saluto personalizzato ogni volta che rispondi in Outlook.
Aggiungi automaticamente un saluto personalizzato alla risposta con VBA
Aggiungi automaticamente un saluto personalizzato alla risposta con Kutools per Outlook
Aggiungi automaticamente un saluto personalizzato alla risposta con VBA
Il seguente codice VBA aggiunge automaticamente un saluto personalizzato quando si risponde ai messaggi in Outlook. Procedere come segue:
1. Seleziona il messaggio di posta elettronica a cui vuoi rispondere.
2. Premere i tasti Alt+F11 per aprire la finestra Microsoft Visual Basic for Applications.
3. Fai clic su Inserisci > Modulo, quindi incolla il seguente codice VBA nella nuova finestra del modulo.
VBA: Rispondi con un saluto personalizzato
Sub ReplyWithGreeting()
Dim oMItem As Outlook.MailItem
Dim oMItemReply As Outlook.MailItem
Dim sGreetName As String
Dim iGreetType As Long
On Error Resume Next
Select Case TypeName(Application.ActiveWindow)
Case "Explorer"
Set oMItem = ActiveExplorer.Selection.Item(1)
Case "Inspector"
Set oMItem = ActiveInspector.CurrentItem
Case Else
End Select
On Error GoTo 0
If oMItem Is Nothing Then GoTo ExitProc
On Error Resume Next
iGreetType = InputBox("How to greet:" & vbCr & vbCr & "Type '1' for name, '2' for time of day")
On Error GoTo 0
If iGreetType = False Then GoTo ExitProc
If iGreetType = 1 Then
sGreetName = oMItem.SenderName
ElseIf iGreetType = 2 Then
Select Case Time
Case Is < 0.5
sGreetName = "Good morning"
Case 0.5 To 0.75
sGreetName = "Good afternoon"
Case Else
sGreetName = "Good evening"
End Select
Else
GoTo ExitProc
End If
Set oMItemReply = oMItem.Reply
With oMItemReply
.HTMLBody = "<span style=""font-size : 10pt""><p>Hi " & sGreetName & ",</p></span>" & .HTMLBody
.Display
End With
ExitProc:
Set oMItem = Nothing
Set oMItemReply = Nothing
End Sub4. Premere il tasto F5 oppure fare clic sul pulsante Esegui per eseguire questo codice VBA. Si aprirà una finestra di dialogo come mostrato nell’immagine seguente. Digitare 1 o 2 in base alle proprie esigenze, quindi fare clic sul pulsante OK.
| Digitare 1 per un saluto con il nome del destinatario: | Digitare 2 per un saluto con l'orario della giornata: |
 |  |
Nota: In Outlook 2013, questo codice VBA non funziona se si risponde ai messaggi dal riquadro di lettura. Fare clic qui per scoprire come disabilitare la risposta nel riquadro di lettura in Outlook 2013.
Aggiungi automaticamente un saluto personalizzato alla risposta con Kutools per Outlook
Alcuni utenti potrebbero non gradire l’utilizzo del codice VBA in Outlook. Ecco perché ti proponiamo un’alternativa efficace: con l’utilità Saluto automatico di Kutools per Outlook, aggiungi facilmente saluti personalizzati a tutti i messaggi di risposta.
Kutools per Outlooksemplifica la comunicazione quotidiana tramite email in Outlook aggiungendo decine di funzionalità utili.Ulteriori informazioni Scarica gratuitamente ora
1. Fare clic su Kutools > Opzioni.
2. Nella finestra di dialogo Opzioni aperta, passare alla scheda Risposta, selezionare l’opzione Aggiungi automaticamente un saluto quando componi, rispondi o inoltri email, personalizzare il saluto includendo segnaposto come >, > oppure > in base alle proprie esigenze nella casella sottostante e fare clic sul pulsante OK.
D’ora in poi, quando si risponderà ai messaggi in Outlook, il saluto personalizzato verrà aggiunto automaticamente al corpo dell’email, come mostrato nell’immagine seguente:
Nota: In Outlook 2013, questa funzionalità non è disponibile se si risponde ai messaggi direttamente dal riquadro di lettura. Clicca qui per scoprire come disabilitare la risposta nel riquadro di lettura in Outlook 2013.
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi