Sfat: alte limbi sunt traduse de Google. Puteți vizita English versiune a acestei legături.
Contul meu
x
or
x
x
Inregistreaza-te
x

or

Cum se importă fișierele msg din sistemul de fișiere în folderul Outlook?

În mod normal, aveți posibilitatea să importați fișiere msg din sistemul de fișiere într-un dosar Outlook trăgând și plasându-l. În acest articol, vă vom arăta o metodă ușoară de a importa în detaliu toate fișierele de tip "msg" dintr-un sistem de fișiere într-un folder specificat din Outlook.

Importați fișierele msg din sistemul de fișiere în folderul Outlook cu codul VBA


Salvați ușor e-mailurile selectate ca fișiere de format diferite în Outlook:

Cu utilitarul Salvați fișier din Kutools pentru Outlook, puteți salva cu ușurință mai multe e-mailuri selectate, ca fișier HTML format individual, fișier format TXT, document Word, fișier CSV, precum și fișier PDF în Outlook, după cum a fost prezentat în ecranul de mai jos.

Kutools pentru Outlook: cu mai mult de 40 la îndemână Outlook add-in-uri, liber să încercați fără limitări în 45 zile. Descărcați și încercați gratuit acum!


Importați fișierele msg din sistemul de fișiere în folderul Outlook cu codul VBA

Procedați după cum urmează pentru a importa fișierele msg din sistemul de fișiere într-un folder specificat în Outlook.

1. apasă pe Alt + F11 pentru a deschide tasta Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module. Apoi copiați sub codul VBA în fereastra Module.

Codul VBA: Importați fișierele msg din sistemul de fișiere în dosarul Outlook

Sub ImportMessagesInFolder () Dim xFSO Ca Scripting.FileSystemObject Dim xSourceFld Ca Scripting.Folder Dim xSourceFldPath Ca Dimensiune șir xFileItem Ca Scripting.File Dim xMSG Ca Obiect Dim xMailItem Ca MailItem Dim xSaveFld Ca Outlook.Folder La Eroare Resume Următorul Set xFSO = Scripting Nou. FileSystemObject Set xSelFolder = CreateObject ("Shell.Application") BrowseForFolder (0, "Selectați un dosar:", 0, 0) În cazul în care Not TypeName (xSelFolder) Elf xSourceFldPath = "" Exit Sub-End Dacă setați xSourceFld = xFSO.GetFolder (xSourceFldPath) Setați xSaveFld = GetObject ("," Outlook.Application ") GetNamespace (" MAPI ") PickFolder Dacă TypeName (xSaveFld) Apoi Exit Sub End Dacă pentru fiecare xFileItem În xSourceFld.Files Set xMSG = Session.OpenSharedItem (xFileItem.Path) Set xMailItem = xMSG.Copy xMailItem.Move Set xSaveFld xMailItem = Nimic xMSG.Delete Set xMSG = Nimic Următor Set xFileItem xFileItem = Nimic Setați xSourceFld = Nimic setat xFSO = N Ending Sub

3. apasă pe F5 cheia pentru a rula codul. În deschidere Răsfoiți pentru dosar , selectați folderul care conține fișierele msg pe care le veți importa în dosarul Outlook, apoi faceți clic pe OK buton. Vedeți captura de ecran:

4. Acum a Selectați Dosar caseta de dialog va apărea, selectați un Perspectivă folder pentru a salva fișierele de mesaje importate și faceți clic pe OK butonul.

Apoi toate fișierele msg într-un anumit dosar din sistemul dvs. de fișiere sunt importate imediat într-un folder specificat Outlook.


Legate de articole:



Instrumente de productivitate recomandate

Tab-ul Office

aur star1 Aduceți file la îndemână Excel și alte programe Office, la fel ca Chrome, Firefox și noul Internet Explorer.

Kutools pentru Excel

aur star1 Uimitor! Sporiți productivitatea în minute 5. Nu aveți nevoie de abilități speciale, cu excepția a două ore în fiecare zi!

aur star1 300 Caracteristici noi pentru Excel, Make Excel mult mai ușor și mai puternic:

  • Mergeți celule / rânduri / coloane fără a pierde date.
  • Combină și consolidează mai multe coli și foi de lucru.
  • Comparați intervale, copiați mai multe intervale, convertiți textul în data, conversia unității și monedelor.
  • Numărați după culori, subtotalări pentru pagini, sortare avansată și filtru super,
  • Mai mult Selectați / Inserați / Ștergeți / Text / Format / Link / Comment / Workbooks / Foi de lucru Instrumente ...

Ecranul lui Kutools pentru Excel

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.
  • To post as a guest, your comment is unpublished.
    Amey Thombre · 10 months ago
    This is amazing and just does what i was looking for. just make sure that you have Microsoft System Runtime library selected in the references of the VBA project as Scripting object is from that library.