Tip: Jiné jazyky jsou přeloženy společností Google. Můžete navštívit English verze tohoto odkazu.
Přihlásit se
x
or
x
x
Registrovat
x

or

Jak importovat soubory zpráv ze systému souborů do složky Outlook?

Obvykle můžete importovat soubory zpráv ze systému souborů do složky Outlook přetažením. V tomto článku vám ukážeme jednoduchou metodu importování všech souborů zpráv ze systému souborů do konkrétního adresáře aplikace Outlook podrobněji.

Importovat soubory zpráv ze systému souborů do složky Outlook s kódem VBA


Snadné ukládání vybraných e-mailů v různých formátech v aplikaci Outlook:

Pomocí nástroje Uložit jako soubor aplikace Kutools pro aplikaci Outlook můžete snadno uložit několik vybraných e-mailů ve formátu HTML ve formátu HTML, ve formátu TXT, v dokumentu Word, v souboru CSV i ve formátu PDF v aplikaci Outlook.

Kutools pro aplikaci Outlook: s více než 40 šikovnými doplňky aplikace Outlook, můžete zkusit bez omezení v 45 dnech. Stáhněte si bezplatnou zkušební verzi teď!


Importovat soubory zpráv ze systému souborů do složky Outlook s kódem VBA

Postupujte následujícím způsobem importovat soubory zpráv ze systému souborů do určité složky v aplikaci Outlook.

1. zmáčkni Další + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2. V Microsoft Visual Basic pro aplikace okno, klepněte na tlačítko Vložit > Modul. Potom zkopírujte kód VBA do okna Modul.

Kód VBA: Importovat soubory zpráv ze systému souborů do složky Outlook

Sub ImportMessagesInFolder () Dim xFSO Jako Scripting.FileSystemObject Dim xSourceFld Jako Scripting.Folder Dim xSourceFldPath Jako DimetFileItem jako Scripting.File Dim xMSG Jako objekt Dim xMailItem Jako MailItem Dim xSaveFld Jako Outlook.Folder On Error Resume Další Nastavit xFSO = Nové skriptování. FileSystemObject Nastavit xSelFolder = CreateObject ("Shell.Application") BrowseForFolder (0, "Vyberte složku:", 0, 0) Pokud Not TypeName (xSelFolder) = "Nothing" Pak xSourceFldPath = xSelFolder.self.Path + Else xSourceFldPath = "" Opustit podkonec Pokud je nastaven xSourceFld = xFSO.GetFolder (xSourceFldPath) Nastavit xSaveFld = GetObject ("", "Outlook.Application") GetNamespace ("MAPI") PickFolder If TypeName (xSaveFld) Potom ukončete dílčí koncovku Pokud pro každý soubor xFileItem v xSourceFld.Files Nastavte xMSG = Session.OpenSharedItem (xFileItem.Path) Nastavte xMailItem = xMSG.Copy xMailItem.Move xSaveFld Sada xMailItem = Nothing xMSG.Delete Set xMSG = Nic Další xFileItem Set xFileItem = Nic Nastavit xSourceFld = Nic nenastaveno xFSO = N konec pod

3. zmáčkni F5 pro spuštění kódu. V úvodu Procházet složku dialogové okno vyberte složku obsahuje soubory zpráv importovat do složky Outlook a klepněte na tlačítko OK tlačítko. Zobrazit screenshot:

4. Nyní a Vybrat složku dialogové okno se zobrazí, vyberte prosím výhled pro uložení importovaných souborů zpráv a klepněte na tlačítko OK tlačítko.

Pak jsou všechny soubory zpráv v určité složce systému souborů importovány do určité složky aplikace Outlook okamžitě.


Související články:



Doporučené nástroje pro produktivitu

Karta Office

zlatá hvězda1 Přiveďte praktické karty do aplikace Excel a jiného softwaru Office, stejně jako Chrome, Firefox a nový Internet Explorer.

Kutools pro Excel

zlatá hvězda1 Úžasný! Zvyšte svou produktivitu v minutách 5. Nepotřebujete žádné speciální dovednosti, kromě dvou hodin denně!

zlatá hvězda1 300 Nové funkce pro aplikaci Excel, Značka Excel je velmi snadná a výkonná:

  • Sloučit buňky / řádky / sloupce bez ztráty dat.
  • Kombinovat a konsolidovat více listů a sešitů.
  • Srovnání rozsahů, kopírování více rozsahů, převod textu na datum, konverzi jednotek a měn.
  • Počet podle barvy, dílčí součty stránkování, třídění podle rozšířeného třídění a super filtru,
  • Více Vyberte / Vložit / Odstranit / Text / Formát / Odkaz / Komentář / Workbooks / Worksheets Nástroje ...

Snímka obrazovky Kutools pro 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.