Jak exportovat hlavní text e-mailu aplikace Outlook do tabulky aplikace Excel?
Export textu e-mailu z aplikace Outlook do tabulky aplikace Excel může být užitečný pro sledování informací nebo analýzu dat z e-mailů. Tento výukový program vás provede dvěma způsoby: pomocí VBA (Visual Basic for Applications) pro ruční exporty a funkce Uložit zprávy jako jiné soubory aplikace Kutools pro Outlook, která celý proces zjednodušuje.
Export textu e-mailu do Excelu pomocí VBA
Hromadný export textu e-mailu do Excelu pomocí Kutools pro Outlook
Podporuje export více zpráv a jejich ukládání jako PDF, Excel, HTML nebo jiné formáty souborů.
Export textu e-mailu do Excelu pomocí VBA
Použití VBA je ruční metoda pro export hlavního textu e-mailu do tabulky aplikace Excel. Postupujte takto:
1. Otevřete e-mail, vyberte text e-mailu, který chcete exportovat do tabulky aplikace Excel, a poté stiskněte 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. A pak zkopírujte níže uvedený kód VBA do okna Kód.
Kód VBA: exportujte hlavní text e-mailu aplikace Outlook do tabulky aplikace Excel
Sub ExportToExcel()
Dim xExcel As Excel.Application
Dim xWb As Workbook
Dim xWs As Worksheet
Dim xInspector As Inspector
Dim xItem As Object
Dim xMailItem As MailItem
Dim xDoc As Document
Dim xShell As Object
Dim xFilePath As String
On Error Resume Next
Set xShell = CreateObject("Shell.Application")
Set xFolder = xShell.BrowseForFolder(0, "Select a Folder:", 0, 0)
If TypeName(xFolder) = "Nothing" Then Exit Sub
Set xFolderItem = xFolder.Self
xFilePath = xFolderItem.Path & "\"
Set xItem = Outlook.Application.ActiveExplorer.Selection.item(1)
If xItem.Class <> olMail Then Exit Sub
Set xMailItem = xItem
Set xInspector = xMailItem.GetInspector
Set xDoc = xInspector.WordEditor
xDoc.Application.Selection.Range.Copy
xInspector.Close olDiscard
Set xExcel = New Excel.Application
Set xWb = xExcel.Workbooks.Add
Set xWs = xWb.Sheets.item(1)
xExcel.Visible = False
xWs.Activate
xWs.Paste
xWs.SaveAs xFilePath & "Email body.xlsx"
xWb.Close True
xExcel.Quit
Set xWs = Nothing
Set xWb = Nothing
Set xExcel = Nothing
End SubPozor: V kódu, “E-mail body.xlsx„Je název sešitu, který vytvoříte s vybraným textem hlavního e-mailu. Můžete to změnit podle toho, co potřebujete.
3. cvaknutí Tools > Reference. Pak zkontrolujte obě Objektová knihovna Microsoft Excel si Objektová knihovna Microsoft Word krabice v Reference - projekt dialogové okno. Viz snímek obrazovky:
4. Pak a Procházet složku Zobrazí se dialogové okno, vyberte složku pro uložení sešitu a klikněte na ikonu OK .
Nyní sešit s názvem „email tělo”Je vytvořen a uložen do určené složky. Otevřete sešit a uvidíte, že vybraný text e-mailu se exportuje do Listu 1 sešitu.
AI Mail Assistant v aplikaci Outlook: Chytřejší odpovědi, jasnější komunikace (kouzlo na jedno kliknutí!) UVOLNIT
Zjednodušte své každodenní úkoly Outlooku pomocí AI Mail Assistant od Kutools pro Outlook. Tento výkonný nástroj se učí z vašich minulých e-mailů, aby nabídl inteligentní a přesné odpovědi, optimalizoval obsah vašich e-mailů a pomohl vám bez námahy navrhovat a upravovat zprávy.
Tato funkce podporuje:
- Chytré odpovědi: Získejte odpovědi vytvořené z vašich minulých konverzací – přizpůsobené, přesné a připravené k použití.
- Vylepšený obsah: Automaticky upravte text e-mailu tak, aby byl srozumitelný a účinný.
- Skládání bez námahy: Stačí zadat klíčová slova a nechat AI, aby se postarala o zbytek, s několika styly psaní.
- Inteligentní rozšíření: Rozšiřte své myšlenky pomocí kontextových návrhů.
- Shrnutí: Získejte okamžitě stručné přehledy dlouhých e-mailů.
- Globální dosah: Snadno překládejte své e-maily do jakéhokoli jazyka.
Tato funkce podporuje:
- Chytré e-mailové odpovědi
- Optimalizovaný obsah
- Koncepty založené na klíčových slovech
- Inteligentní rozšíření obsahu
- Emailová sumarizace
- Vícejazyčný překlad
Nejlepší ze všeho je, že tato funkce je zcela uvolnit navždy! Nečekej —stáhněte si AI Mail Assistant nyní a užívejte si!
Hromadný export textu e-mailu do Excelu pomocí Kutools pro Outlook
Pokud dáváte přednost uživatelsky přívětivému a časově úspornému způsobu, Kutools pro aplikaci Outlook nabízí Uložit zprávy jako jiné soubory funkce, která vám umožní hromadně uložit text těla e-mailu a další podrobnosti.
Po instalaci Kutools pro Outlook postupujte podle níže uvedených kroků
Krok 1. Vyberte zprávy, jejichž hlavní texty chcete exportovat.
Krok 2. Klikněte na tlačítko Kutools > Hromadné zpracování > Uložit vybrané e-maily jako soubory v různých formátech, jako je PDF.
Krok 3. V Uložit zprávy jako jiné soubory dialog,
Vyberte složku, do které chcete exportované soubory umístit.
Klíště vynikat formát.
Klíště Tělo pouze.
Klepněte na tlačítko OK .
Nyní se jako samostatné excelové soubory ukládají pouze hlavní texty vybraných zpráv.
Nejlepší nástroje pro produktivitu v kanceláři
Nejnovější zprávy: Spuštění Kutools pro Outlook Volná verze!
Vyzkoušejte zcela nové Kutools pro Outlook ZDARMA verze s více než 70 neuvěřitelnými funkcemi, kterou můžete používat NAVŽDY! Kliknutím stáhnete hned!
???? Automatizace e-mailu: Automatická odpověď (k dispozici pro POP a IMAP) / Naplánujte odesílání e-mailů / Automatická kopie/skrytá kopie podle pravidel při odesílání e-mailu / Automatické přeposílání (pokročilá pravidla) / Automatické přidání pozdravu / Automaticky rozdělte e-maily pro více příjemců na jednotlivé zprávy ...
📨 Email management: Připomenout e-maily / Blokujte podvodné e-maily podle předmětů a dalších / Odstranit duplicitní e-maily / pokročilé vyhledávání / Konsolidovat složky ...
📁 Přílohy Pro: Dávkové uložení / Dávkové odpojení / Dávková komprese / Automaticky uložit / Automatické odpojení / Automatické komprimování ...
???? Rozhraní Magic: 😊 Více pěkných a skvělých emotikonů / Připomeňte si, když přijdou důležité e-maily / Minimalizujte aplikaci Outlook namísto zavírání ...
???? Zázraky na jedno kliknutí: Odpovědět všem s příchozími přílohami / E-maily proti phishingu / 🕘Zobrazit časové pásmo odesílatele ...
👩🏼🤝👩🏻 Kontakty a kalendář: Dávkové přidání kontaktů z vybraných e-mailů / Rozdělit skupinu kontaktů na jednotlivé skupiny / Odeberte připomenutí narozenin ...
