Tipp: Az egyéb nyelvek a Google Fordítva vannak. Látogasson el a English a link verziója.
Belépek
x
or
x
x
Regisztráció
x

or

Hogyan importálhat MSG fájlokat a fájlrendszerből az Outlook mappába?

Normális esetben importálhat fájlokat a fájlrendszerből az Outlook mappába húzással és lehúzással. Ebben a cikkben megmutatjuk Önnek egy egyszerű módszert, ha az összes msg fájlt egy fájlrendszerből egy meghatározott Outlook mappába importálhatja.

Importálj msg fájlokat a fájlrendszerből az Outlook mappába VBA kóddal


Könnyen mentheti a kiválasztott e-maileket különböző formátumú fájlként az Outlook alkalmazásban:

A Kutools for Outlook Mentés másként segédprogramjával egyszerűen mentheti több kiválasztott e-mailt egyéni HTML formátumú fájlként, TXT formátumú fájlként, Word-dokumentumban, CSV-fájlban és PDF-fájlban az Outlook programban.

Kutools for Outlook: több mint 40 praktikus Outlook bővítményekkel, ingyenesen próbálkozhat az 45 napokban korlátozás nélkül. Töltse le és ingyen próbálja most!


Importálj msg fájlokat a fájlrendszerből az Outlook mappába VBA kóddal

A következőképpen hajthatja végre az msg fájlok importálását a fájlrendszerből az Outlook adott mappájába.

1. megnyomni a más + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok. Ezután másolja a VBA kód alá a Modul ablakot.

VBA kód: importál fájlokat a fájlrendszerről az Outlook mappába

Sub ImportMessagesInFolder () Dim xFSO mint parancsfájl.FileSystemObject Dim xSourceFld parancsfájlként.Folder Dim xSourceFldPath String Dim xFileItem parancsfájlként.File Dim xMSG mint objektum dim xMailItem mint MailItem Dim xSaveFld Mint Outlook.Folder a hiba folytatása Következő készlet xFSO = Új parancsfájl. FileSystemObject Set xSelFolder = CreateObject ("Shell.Application") BrowseForFolder (0, "Válasszon mappát:", 0, 0) Ha nem típusnév (xSelFolder) = "Semmi", akkor xSourceFldPath = xSelFolder.self.Path + Elso xSourceFldPath = "" Exit Sub End Ha be van állítva xSourceFld = xFSO.GetFolder (xSourceFldPath) Set xSaveFld = GetObject ("", "Outlook.Application") GetNamespace ("MAPI") PickFolder Ha TypeName (xSaveFld) = " Ezután Exit Sub End Ha minden xFileItem In xSourceFld.Files Set xMSG = Session.OpenSharedItem (xFileItem.Path) Set xMailItem = xMSG.Copy xMailItem.Move xSaveFld Set xMailItem = Semmi xMSG.Delete Set xMSG = Semmi Következő xFileItem Set xFileItem = Semmi Állítsa be az xSourceFld = Nothing beállítást xFSO = N othing End Sub

3. megnyomni a F5 kulcs a kód futtatásához. A nyitóban Tallózás a mappába párbeszédpanelen jelölje ki azt a mappát, amely az MSG fájljait importálja az Outlook mappába, majd kattintson a OK gomb. Lásd a képernyőképet:

4. Most a Válassza ki a Mappa párbeszédablak jelenik meg, kérjük, válasszon egy kilátás mappa az importált msg fájlok mentéséhez, majd kattintson a OK gombot.

Ezután az összes msg fájlt a fájlrendszer egy bizonyos mappájába azonnal importálják egy adott Outlook mappába.


Kapcsolódó cikkek:



Ajánlott termelékenységi eszközök

Office Tab

arany star1 Kényelmes lapokat hozhat Excel és más Office szoftverekhez, akárcsak a Chrome, a Firefox és az új Internet Explorer.

Kutools for Excel

arany star1 Elképesztő! Növelje termelékenységét 5 perc alatt. Nincs szükség különleges képességekre, kivéve két órát minden nap!

arany star1 300 Az Excel új funkciói, az Excel nagyon egyszerű és erőteljes:

  • A cella / sorok / oszlopok egyesítése adatok elvesztése nélkül.
  • Több lap és munkafüzet kombinálása és egységesítése.
  • Hasonlítsa össze a tartományokat, másolja a többszörös tartományokat, konvertálja a dátumot, a mértékegységet és a pénznemek konverzióját.
  • Számolás a Színek, a Paging Subtotals, az Advanced Sort és a Super Filter,
  • Több Select / Insert / Delete / Szöveg / Formátum / Link / Comment / Workbooks / Worksheets Tools ...

A Kutools for Excel képernyőkép

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.