Note: The other languages of the website are Google-translated. Back to English
English English

Come esportare automaticamente le e-mail da Outlook a Excel?

Normalmente, puoi esportare le e-mail da Outlook a Excel con la funzione Importa / Esporta. Ma hai mai provato a esportare automaticamente le e-mail in un file Excel quando arrivano nuovi messaggi? In questo articolo, parlerò di come esportare automaticamente le informazioni dei nuovi messaggi in arrivo in Excel.

Esportare automaticamente le informazioni e-mail da Outlook a Excel con codice VBA

Esporta le informazioni e-mail da Outlook a Excel con una funzionalità straordinaria


Esportare automaticamente le informazioni e-mail da Outlook a Excel con codice VBA

Per esportare automaticamente le nuove e-mail in arrivo in una cartella di lavoro di Excel, applicare il seguente codice VBA:

1. Innanzitutto, dovresti creare una cartella di lavoro con le informazioni di intestazione di seguito come mostrato nella seguente schermata, quindi queste informazioni dei messaggi verranno esportate in questo file Excel.

doc di esportazione automatica delle e-mail in Excel 1

2. Quindi vai su Outlook e tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

3. Nel Microsoft Visual Basic, Applications Edition finestra, fare doppio clic Questa sessione di Outlook dal Progetto1 (VbaProject.OTM) riquadro per aprire la modalità, quindi copia e incolla il codice seguente nel modulo vuoto.

Codice VBA: esportazione automatica delle informazioni e-mail da Outlook a file Excel:

Public WithEvents GMailItems As Outlook.Items
Private Sub Application_Startup()
    Set GMailItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub GMailItems_ItemAdd(ByVal Item As Object)
    Dim xMailItem As Outlook.MailItem
    Dim xExcelFile As String
    Dim xExcelApp As Excel.Application
    Dim xWb As Excel.Workbook
    Dim xWs As Excel.Worksheet
    Dim xNextEmptyRow As Integer
    On Error Resume Next
    If Item.Class <> olMail Then Exit Sub
    Set xMailItem = Item
    xExcelFile = "C:\Users\DT168\Desktop\split document\kto-data.xlsx"
    If IsWorkBookOpen(xExcelFile) = True Then
        Set xExcelApp = GetObject(, "Excel.Application")
        Set xWb = GetObject(xExcelFile)
        If Not xWb Is Nothing Then xWb.Close True
    Else
        Set xExcelApp = New Excel.Application
    End If
    Set xWb = xExcelApp.Workbooks.Open(xExcelFile)
    Set xWs = xWb.Sheets(1)
    xNextEmptyRow = xWs.Range("B" & xWs.Rows.Count).End(xlUp).Row + 1
    With xWs
        .Cells(xNextEmptyRow, 1) = xNextEmptyRow - 1
        .Cells(xNextEmptyRow, 2) = xMailItem.SenderName
        .Cells(xNextEmptyRow, 3) = xMailItem.SenderEmailAddress
        .Cells(xNextEmptyRow, 4) = xMailItem.Subject
        .Cells(xNextEmptyRow, 5) = xMailItem.ReceivedTime
    End With
    xWs.Columns("A:E").AutoFit
    xWb.Save
End Sub
Function IsWorkBookOpen(FileName As String)
    Dim xFreeFile As Long, xErrNo As Long
    On Error Resume Next
    xFreeFile = FreeFile()
    Open FileName For Input Lock Read As #xFreeFile
    Close xFreeFile
    xErrNo = Err
    On Error GoTo 0
    Select Case xErrNo
        Case 0: IsWorkBookOpen = False
        Case 70: IsWorkBookOpen = True
        Case Else: Error xErrNo
    End Select
End Function

Note:: Nel codice sopra, C: \ Users \ DT168 \ Desktop \ split document \ kto-data.xlsx è il percorso del file Excel e il nome Excel in cui si desidera individuare le informazioni esportate, modificarlo in base alle proprie esigenze.

doc di esportazione automatica delle e-mail in Excel 2

4. Ancora in Microsoft Visual Basic, Applications Edition finestra, fare clic Strumenti > Referenze per andare al Riferimenti-Progetto1 finestra di dialogo e selezionare Libreria di oggetti di Microsoft Excel opzione dal Riferimenti disponibili casella di riepilogo, vedi screenshot:

doc di esportazione automatica delle e-mail in Excel 3

5. Quindi fare clic OK pulsante per chiudere la finestra di dialogo, quindi salvare e chiudere la finestra del codice.

6. Ora dovresti riavviare Outlook per rendere effettivo questo codice. D'ora in poi, se ci sono nuove e-mail in arrivo, verranno esportate automaticamente nella cartella di lavoro specifica, vedi screenshot:

doc di esportazione automatica delle e-mail in Excel 4


Esporta le informazioni e-mail da Outlook a Excel con una funzionalità straordinaria

Se desideri esportare le e-mail da Posta in arrivo, Posta in uscita o altre cartelle in un file Excel, Kutools per Outlook's Rapporto rapido può aiutarti a generare facilmente un file XML per riportare le informazioni di tutti gli elementi nella cartella e-mail corrente o nella cartella delle attività di cui hai bisogno.

NOTA:Per applicare questo Rapporto rapido, in primo luogo, dovresti scaricare il file Kutools per Outlooke quindi applica la funzione in modo rapido e semplice.

Dopo l'installazione Kutools per Outlook, per favore fai come questo:

1. Selezionare una cartella in cui si desidera esportare tutte le informazioni sui messaggi, quindi fare clic su Kutools Plus > Rapporto rapido, vedi screenshot:

2. Quindi, nel saltò fuori Salva report finestra, scegli una posizione e specifica un nome per questo file esportato, vedi screenshot:

3. Quindi fare clic su Risparmi per salvare questo file e, nella casella spuntata, fare clic su pulsante per aprire il file, vedi screenshot:

4. Ora puoi vedere tutte le informazioni delle e-mail nella cartella selezionata che sono state esportate nel file Excel, vedi screenshot:


Articoli più relativi:

  • Esporta la tabella del corpo dell'email in Excel in Outlook
  • Quando si riceve un'e-mail che contiene alcune tabelle nel corpo, a volte potrebbe essere necessario esportare tutte le tabelle dal corpo del messaggio a un foglio di lavoro Excel. Normalmente, puoi copiare e incollare le tabelle nel foglio di lavoro, ma, qui, parlerò di un metodo utile per risolvere questo lavoro quando ci sono più tabelle da esportare.
  • Estrai o esporta l'elenco delle attività in Excel in Outlook
  • Durante l'utilizzo di Outlook, è possibile estrarre l'elenco delle attività in Excel per altri utilizzi. Con la potente funzionalità di esportazione in Outlook, puoi esportare facilmente l'elenco delle attività in Excel. Si prega di fare come illustrato di seguito.
  • Esporta le informazioni dei contatti con le foto in Outlook
  • Quando si esportano i contatti da Outlook in un file, è possibile esportare solo le informazioni di testo dei contatti. Ma, a volte, hai bisogno di esportare le foto e le informazioni di testo dei contatti, come potresti gestire questa attività in Outlook?

Kutools for Outlook: porta 100 funzionalità avanzate in Outlook e semplifica notevolmente il lavoro!

  • Auto CC / BCC dalle regole durante l'invio di e-mail; Avanzamento automatico Email multiple personalizzate; Risposta automatica senza server di scambio e più funzioni automatiche ...
  • Avviso BCC - mostra il messaggio quando provi a rispondere a tutti se il tuo indirizzo e-mail è nell'elenco BCC; Ricorda quando mancano allegatie altre funzioni di promemoria ...
  • Rispondi (tutti) con tutti gli allegati nella conversazione di posta; Rispondi a molte email in secondi; Aggiunta automatica di saluto quando rispondi; Aggiungi la data all'oggetto ...
  • Strumenti per gli allegati: gestisci tutti gli allegati in tutti i messaggi, Scollegamento automatico, Comprimi tutto, Rinomina tutto, Salva tutto... Rapporto rapido, Conta le email selezionate...
  • E-mail spazzatura potenti per abitudine; Rimuovi messaggi e contatti duplicati... Consentono di fare in modo più intelligente, veloce e migliore in Outlook.
girato kutools outlook scheda kutools 1180x121
girato kutools outlook kutools plus tab 1180x121
 
Commenti (8)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
Ho bisogno di aiuto per esportare le informazioni e-mail inviate (in uscita) e-mail
Questo commento è stato fatto dal moderatore sul sito
Ciao, Jorge,
Se desideri esportare i messaggi inviati dalla cartella Posta inviata, la funzione Rapporto rapido di Kutools per Outlook può aiutarti. Puoi prima scaricare Kutools per Outlook e quindi applicarlo.
Questo commento è stato fatto dal moderatore sul sito
come gestire le sottocartelle.
Questo commento è stato fatto dal moderatore sul sito
Puoi per favore farmi sapere come gestire le sottocartelle nel codice sopra.
Questo commento è stato fatto dal moderatore sul sito
Come acquisire le categorie, l'importanza o la colonna definita dall'utente nella stessa vista della cartella?
Questo commento è stato fatto dal moderatore sul sito
Ho seguito i passaggi precedenti ma ho spazi vuoti in Excel.
cosa dovrei fare?
Questo commento è stato fatto dal moderatore sul sito
Lo stesso excel non viene aggiornato? Eventuali suggerimenti?
Questo commento è stato fatto dal moderatore sul sito
Se ho più di un account di posta elettronica in Outlook, come posso inviare le e-mail da un account specificato?
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite