Pääsisältö

Kuinka viedä Outlook-sähköpostin leipäteksti Excel-laskentataulukkoon?

Kirjailija: Siluvia Viimeksi muokattu: 2024-12-17

Sähköpostin leipätekstin vieminen Outlookista Excel-laskentataulukkoon voi olla hyödyllistä tietojen pitämisessä tai sähköpostien tietojen analysoinnissa. Tämä opetusohjelma opastaa sinua kahden menetelmän läpi: VBA:n (Visual Basic for Applications) käyttö manuaaliseen vientiin ja Kutools for Outlookin Tallenna viestit muina tiedostoina -ominaisuuden avulla, joka yksinkertaistaa prosessia.

Sähköpostin leipätekstin vieminen Exceliin VBA:lla

Sähköpostin runkotekstin vieminen Exceliin joukkona Kutools for Outlookin avulla
Tukee useiden viestien vientiä ja niiden tallentamista PDF-, Excel-, HTML- tai muissa tiedostomuodoissa.


Sähköpostin leipätekstin vieminen Exceliin VBA:lla

VBA:n käyttäminen on manuaalinen tapa viedä sähköpostin leipäteksti Excel-laskentataulukkoon. Toimi seuraavasti:

1. Avaa sähköposti, valitse sähköpostin tekstiosa, jonka haluat viedä Excel-laskentataulukkoon, ja paina sitten muut + F11 avaimet avaamaan Microsoft Visual Basic for Applications ikkunassa.

2. Vuonna Microsoft Visual Basic for Applications -ikkunassa liite > Moduulit. Kopioi sitten alla oleva VBA-koodi Code-ikkunaan.

VBA-koodi: vie Outlook-sähköpostin leipäteksti Excel-laskentataulukkoon

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 Sub

Huomautuksia: Koodissa "Sähköposti body.xlsx” on työkirjan nimi, jonka luot valitulla sähköpostin leipätekstillä. Voit muuttaa sitä tarpeidesi mukaan.

3. napsauttaa Työkalut > Viitteet. Tarkista sitten molemmat Microsoft Excel -objektikirjasto ja Microsoft Word -objektikirjasto laatikot Referenssit – Projekti valintaikkuna. Katso kuvakaappaus:

doc-export-body-to-excel-1

4. Sitten a Selaa kansioon valintaikkuna avautuu, valitse kansio työkirjan tallentamista varten ja napsauta OK painiketta.

doc-export-body-to-excel-2

Nyt työkirja nimeltä "Sähköpostin runko” luodaan ja tallennetaan määritettyyn kansioon. Avaa työkirja, näet valitun sähköpostin leipätekstin viedään työkirjan Sheet1:een.

AI Mail Assistant Outlookissa: älykkäämpiä vastauksia, selkeämpi viestintä (yhden napsautuksen taikuutta!) VAPAA

Virtaviivaista päivittäisiä Outlook-tehtäviäsi Kutools for Outlookin AI Mail Assistantin avulla. Tämä tehokas työkalu oppii aiemmista sähköpostiviesteistäsi ja tarjoaa älykkäitä ja tarkkoja vastauksia, optimoi sähköpostisi sisällön ja auttaa sinua luomaan ja tarkentamaan viestejä vaivattomasti.
doc ai sähköpostin kahva

Tämä ominaisuus tukee:

  • Älykkäät vastaukset: saat aiemmista keskusteluistasi luotuja vastauksia – räätälöityjä, tarkkoja ja valmiita käyttöön.
  • Parannettu sisältö: tarkenna sähköpostisi tekstiä automaattisesti selkeyden ja vaikutuksen saamiseksi.
  • Vaivaton kokoonpano: Anna vain avainsanoja ja anna tekoäly hoitaa loput useilla kirjoitustyyleillä.
  • Älykkäät laajennukset: Laajenna ajatuksiasi kontekstitietoisilla ehdotuksilla.
  • Yhteenveto: Saat lyhyet yleiskatsaukset pitkistä sähköposteista välittömästi.
  • Globaali kattavuus: Käännä sähköpostisi helposti mille tahansa kielelle.

Tämä ominaisuus tukee:

  • Älykkäät sähköpostivastaukset
  • Optimoitu sisältö
  • Avainsanoihin perustuvat luonnokset
  • Älykäs sisältölaajennus
  • Yhteenveto sähköpostitse
  • Monikielinen käännös

Mikä parasta, tämä ominaisuus on täysin Ilmainen ikuisesti! Älä odota -lataa AI Mail Assistant nyt ja nauti!


Sähköpostin runkotekstin vieminen Exceliin joukkona Kutools for Outlookin avulla

Jos pidät käyttäjäystävällisestä ja aikaa säästävästä menetelmästä, Kutools Outlookille tarjoaa Tallenna viestit muina tiedostoina ominaisuus, jonka avulla voit tallentaa sähköpostin leipätekstiä ja muita yksityiskohtia kerralla.

Kutools Outlookille: Avaa yli 100 olennaista ja edistynyttä ominaisuutta! Nauti yli 70 ominaisuudesta ilmaiseksi. Lataa ja tutki ilmainen versio jo tänään!

Kun olet asentanut Kutools for Outlookin, noudata alla olevia ohjeita

Vaihe 1. Valitse viestit, joiden leipätekstit haluat viedä.

Vaihe 2. Klikkaus Kutools > Joukkokäsittely > Tallenna valitut sähköpostit tiedostoina eri muodoissa, kuten PDF.

napsauta-save-messages-as-fies-under-kutools-tab

Vaihe 3. Kohdassa Tallenna viestit muina tiedostoina dialogi,

  1. Valitse kansio, johon viedään tiedostot.

  2. Rasti kunnostautua -muodossa.

  3. Rasti elin vain.

  4. Napauta Ok.

    save-messages-as-files-dialog

Nyt vain valittujen viestien leipätekstit tallennetaan erillisinä Excel-tiedostoina.

tallenna-tulos

Parhaat toimiston tuottavuustyökalut

Breaking News: Kutools for Outlook julkaisee ilmaisen version!

Koe täysin uusi Kutools for Outlook ILMAINEN versio, jossa on yli 70 uskomatonta ominaisuutta, sinun käytössäsi IKUISESTI! Lataa nyt napsauttamalla!

🤖 Kutools AI : Käyttää edistynyttä tekoälytekniikkaa sähköpostien vaivattoman käsittelyyn, mukaan lukien sähköpostien vastaaminen, yhteenveto, optimointi, laajentaminen, kääntäminen ja kirjoittaminen.

📧 Sähköpostiautomaatio: Automaattinen vastaus (saatavilla POP:lle ja IMAP:lle)  /  Ajoita sähköpostien lähettäminen  /  Automaattinen CC/BCC sääntöjen mukaan lähetettäessä sähköpostia  /  Automaattinen edelleenlähetys (lisäsäännöt)   /  Automaattinen tervehdys   /  Jaa usean vastaanottajan sähköpostit automaattisesti yksittäisiksi viesteiksi ...

📨 Sähköposti Management: Muista sähköpostit  /  Estä huijaussähköpostit aiheiden ja muiden taholta  /  Poista päällekkäiset sähköpostit  /  Tarkennettu Haku  /  Yhdistä kansiot ...

📁 Liitteet ProErätallennus  /  Erä Irrota  /  Eräpakkaus  /  Automaattinen tallennus   /  Automaattinen irrotus  /  Automaattinen pakkaus ...

🌟 Interface Magic: 😊Lisää kauniita ja siistejä emojia   /  Muistuttaa sinua tärkeistä sähköpostiviesteistä  /  Minimoi Outlook sulkemisen sijaan ...

???? Yhden napsautuksen Wonders: Vastaa kaikkiin liitteillä  /   Tietojenkalastelun vastaiset sähköpostit  /  🕘Näytä lähettäjän aikavyöhyke ...

👩🏼‍🤝‍👩🏻 Yhteystiedot ja kalenteri: Erä Lisää yhteystietoja valituista sähköpostiviesteistä  /  Jaa yhteysryhmä yksittäisiin ryhmiin  /  Poista syntymäpäivämuistutukset ...

Avaa Kutools for Outlook välittömästi yhdellä napsautuksella. Älä odota, lataa nyt ja lisää tehokkuuttasi!

kutools Outlook-ominaisuuksille1 kutools Outlook-ominaisuuksille2