Note: The other languages of the website are Google-translated. Back to English
Mewngofnodi  \/ 
x
or
x
Cofrestru  \/ 
x

or

Sut i allforio testun corff e-bost Outlook i daenlen Excel?

Os ydych chi am allforio testun corff e-bost dethol o daenlen Outlook i Excel, gall y dull yn yr erthygl hon eich helpu chi.

Allforio testun corff e-bost Outlook i daenlen Excel gyda chod VBA


Allforio testun corff e-bost Outlook i daenlen Excel gyda chod VBA<

Os gwelwch yn dda rhedeg y cod VBA isod i allforio testun corff dethol o e-bost Outlook i Excel.

1. Agorwch yr e-bost, dewiswch y corff e-bost rydych chi am ei allforio i daenlen Excel, ac yna pwyswch y Alt + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwlau. Ac yna copïwch isod god VBA i mewn i ffenestr y Cod.

Cod VBA: allforio testun corff e-bost Outlook i daenlen 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 Sub

Nodyn: Yn y cod, “E-bostiwch gorff.xlsx”Yw enw'r llyfr gwaith y byddwch chi'n ei greu gyda'r testun corff e-bost a ddewiswyd. Gallwch ei newid yn seiliedig ar eich angen.

3. Cliciwch offer > cyfeiriadau. Yna gwiriwch y ddau Llyfrgell Gwrthrychau Microsoft Excel a Llyfrgell Gwrthrychau Microsoft Word blychau yn y Cyfeiriadau - Prosiect blwch deialog. Gweler y screenshot:

4. Yna a Porwch Am Ffolder blwch deialog yn ymddangos, dewiswch ffolder i achub y llyfr gwaith a chliciwch ar y OK botwm.

Nawr llyfr gwaith o'r enw “Corff e-bost”Yn cael ei greu a'i gadw mewn ffolder benodol. Agorwch y llyfr gwaith, gallwch weld bod y testun corff e-bost a ddewiswyd yn cael ei allforio i Daflen 1 y llyfr gwaith.


Kutools for Outlook - Yn Dod â 100 o Nodweddion Uwch i'w Rhagweld, a Gwneud Gwaith yn Haws Osgach!

  • Auto CC / BCC yn ôl rheolau wrth anfon e-bost; Auto Ymlaen E-byst Lluosog yn ôl arfer; Ymateb Auto heb weinydd cyfnewid, a nodweddion mwy awtomatig ...
  • Rhybudd BCC - dangoswch neges pan geisiwch ateb popeth os yw'ch cyfeiriad post yn rhestr BCC; Atgoffwch Wrth Ymlyniadau ar Goll, a mwy o nodweddion atgoffa ...
  • Ymateb (Pawb) Gyda'r Holl Atodiadau yn y sgwrs bost; Ateb Llawer o E-byst mewn eiliadau; Auto Ychwanegu Cyfarchiad wrth ateb; Ychwanegu Dyddiad i'r pwnc ...
  • Offer Ymlyniad: Rheoli Pob Atodiad ym mhob Post, Datgysylltiad Auto, Cywasgu Pawb, Ail-enwi Pawb, Arbed Pawb ... Adroddiad Cyflym, Cyfrif Postiau Dethol...
  • E-byst Sothach Pwerus yn ôl arfer; Tynnwch y Post a Chysylltiadau Dyblyg... Yn eich galluogi i wneud yn ddoethach, yn gyflymach ac yn well yn Outlook.
tab kutools rhagweld kutools tab 1180x121
kutools rhagweld rhagolygon kutools ynghyd â thab 1180x121
 
Say something here...
symbols left.
You are guest
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.
    Michaael Rejano · 2 years ago
    this work but in one email only what if in folder theres a multiple email thats need to be extracted in excel?
  • To post as a guest, your comment is unpublished.
    Divya · 2 years ago
    Hi the code only returned directly, into the excel and not the body of the email, may I know why was that??
    • To post as a guest, your comment is unpublished.
      Rohit · 2 years ago
      same issue for me as well