Cum să exportați automat informațiile atașate ale e-mailurilor Outlook primite într-un registru de lucru Excel

Unii utilizatori ar dori să înregistreze automat informațiile atașamentelor din fiecare e-mail primit. Acest articol va împărtăși un timp rapid pentru a-l realiza cu ușurință.

Dacă sunteți obișnuit să exportați informațiile atașate ale fiecărui e-mail Outlook primit într-un fișier Excel, poate că veți tânji după unele abordări care să permită Outlook să realizeze automat această activitate. Astfel, puteți scăpa de atașamentele de urmărire manual. Din fericire, deși Outlook nu oferă o funcție atât de directă, o puteți realiza cu puțin scripting. Acum, vă vom învăța pas cu pas.

Exportați automat informațiile atașate ale e-mailurilor primite în Excel

  1. La început, lansați aplicația Outlook.
  2. Apoi, accesați editorul VBA prin „Alt + F11”.
  3. Apoi, copiați următorul cod VBA într-un modul.
Sub AutoExportAttachmentInfo(objMail As Outlook.MailItem) Dim objExcelApp As Excel.Application Dim objExcelWorkbook As Excel.Workbook Dim objExcelWorksheet As Excel.Worksheet Dim nLastRow As Integer Dim objAttachment As Outlook.Attachment As Outlook.Attachment the Atachment the Objn.Ma la fișierul Excel specific strExcelFile = "E:\Attachment Info.xlsx" Set objExcelApp = CreateObject("Excel.Application") objExcelApp.Visible = True Set objExcelWorkbook = objExcelApp.Workbooks.Open(strExcelFile) Set objExcelWorksheet(k objExcelWorkbooks) „Sheet0”) „Exportă informațiile atașamentului în Excel pentru fiecare objAttachment în objMail.Attachments nLastRow = objExcelWorksheet.Range(„A” și objExcelWorksheet.Rows.Count).End(xlUp).Row + 1 cu objExcelWorksheet .Cells,(n1LastRowWorksheet .Cells, ) = objMail.Subject .Cells(nLastRow, 1) = objMail.SenderEmailAddress .Cells(nLastRow, 2) = objAttachment.FileName .Cells(nLastRow, 3) = objMail.ReceivedTime End With Next obj.CocelWor:C"sk ).AutoFit objExcelWorkbook.Close True objExcelApp.Quit End If End Sub

Cod VBA - Export automat informațiile atașate ale e-mailurilor primite în Excel

  1. După aceea, părăsiți editorul VBA.
  2. Ulterior, creați o regulă pentru a rula automat această macrocomandă pe fiecare e-mail primit.
  • În primul rând, accesați meniul „Fișier”.
  • Apoi, faceți clic pe butonul „Gestionați regulile și alertele”.
  • În caseta de dialog „Reguli și alerte”, faceți clic pe „Regulă nouă”.
  • În caseta de dialog „Rule Wizard”, selectați „Aplicați regula la mesajele pe care le primesc” și faceți clic pe „Next”.Aplică regulă pe mesajele pe care le primesc
  • Apoi, setați condițiile regulilor în funcție de nevoile dvs. și apăsați „Următorul”.
  • În pasul „Selectați acțiuni”, selectați „Runează un script” și alegeți scriptul „AutoExportAttachmentInfo”.Selectați Script pentru a rula
  • În cele din urmă, urmați vrăjitorii de pe ecran pentru a finaliza configurarea regulilor.
  1. De acum înainte, de fiecare dată când sosește un nou e-mail în căsuța dvs. poștală, dacă are atașamente, Outlook va exporta automat informațiile atașării în fișierul Excel predefinit.Informații atașate înregistrate în Excel

Nu descărcați niciodată atașamente suspecte

Ați primit vreodată e-mailuri care provin de la expeditori necunoscuți și care conțin atașamente? De obicei, se recomandă să nu aveți încredere în astfel de atașamente, deoarece acestea pot fi cu viruși. Atâta timp cât le descărcați, datele dvs. Outlook pot fi infectate. În acel moment, va trebui remediați Outlook fişier. Desigur, este plin de noduri, cu excepția cazului în care apelați la un instrument de reparare competent, cum ar fi DataNumen Outlook Repair.

Introducerea autorului:

Shirley Zhang este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv recupera Sql Server și produse software de reparații Outlook. Pentru mai multe informații vizitați www.datanumen.com

3 răspunsuri la „Cum să exportați automat informațiile atașate ale e-mailurilor Outlook primite într-un registru de lucru Excel”

  1. Asta nu merge. Deși scriptul rulează, nimic nu este scris în fișierul Excel. Știți care ar putea fi problema?
    Am schimbat calea către un fișier Excel gol și am făcut toți pașii.

Lasă un comentariu

Adresa ta de email nu va fi publicată. Câmpurile obligatorii sunt marcate *