I cookie ci aiutano i nostri servizi. Utilizzando i nostri servizi, l'utente accetta di utilizzare i cookie.
Suggerimento: le altre lingue sono tradotte da Google. Puoi visitare il English versione di questo link.
Log In
x
or
x
x
Registrati
x

or

Come aprire automaticamente tutte le email in arrivo da una persona specifica in Outlook?

Nel nostro lavoro quotidiano, forse ci sono molte e-mail che arrivano nel nostro Outlook, in questo caso puoi ignorare alcune e-mail importanti da una persona specifica. Per evitare di perdere alcune e-mail importanti da qualcuno, puoi fare in modo che le e-mail si aprano automaticamente quando arrivi a Outlook. In questo articolo, introdurrò un codice VBA per l'apertura di tutte le e-mail che da un mittente specifico.

Apri tutte le email in arrivo formano una persona specifica automaticamente con il codice VBA


Apri tutte le email in arrivo formano una persona specifica automaticamente con il codice VBA

Per aprire automaticamente le email da una persona specifica, il seguente codice VBA può aiutarti, per favore fai come segue:

1. Tenere premuto il tasto ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. Nel Microsoft Visual Basic, Applications Edition finestra, doppio clic ThisOutlookSession dal Project1 (VbaProject.OTM) riquadro per aprire la modalità, quindi copiare e incollare il seguente codice nel modulo vuoto.

Codice VBA: consente di aprire tutte le email da una persona specifica:

Public WithEvents GInboxFolder As Outlook.Folder
Public WithEvents GInboxItems As Outlook.Items
Private Sub Application_Startup()
    Set GInboxFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox)
    Set GInboxItems = GInboxFolder.Items
End Sub
Private Sub GInboxItems_ItemAdd(ByVal Item As Object)
    Dim xMailItem As Outlook.MailItem
    Dim xSenders As String
    On Error Resume Next
    If Item.Class <> olMail Then Exit Sub
    Set xMailItem = Item
    xSenders = "yy@addin99.com;applemiemie@163.com"
    If InStr(xSenders, xMailItem.SenderEmailAddress) = 0 Then Exit Sub
    xMailItem.Display
End Sub

doc e-mail aperte dal mittente 1

Note: Nel codice sopra riportato, puoi modificare gli indirizzi dei mittenti a tuo piacimento.

3. Quindi, salva e chiudi questa finestra di codice. Riavvia Outlook per rendere effettivo il codice, d'ora in poi, quando le e-mail che arrivano dalle persone che hai specificato, saranno tutte automaticamente aperte. Vedi screenshot:

doc e-mail aperte dal mittente 2



Kutools for Outlook

Più di 100 Funzioni avanzate per Outlook 2010, 2013, 2016, 2019 e 365

screen shot kutools per outlook minuscolo per banner 201812

Altre caratteristiche | Scarica gratis | Solo $ 39.00 per centinaia di funzioni

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.