Skip to main content
 

Conas tábla comhlacht ríomhphoist a easpórtáil chun barr feabhais a chur ar Outlook?

Údar: Xiaoyang Athraithe Deiridh: 2024-08-20

Nuair a fhaigheann tú R-phost ina bhfuil roinnt táblaí sa chorp, uaireanta, b’fhéidir go mbeidh ort na táblaí go léir a easpórtáil ón gcorp teachtaireachta go bileog oibre barr feabhais. De ghnáth, is féidir leat na táblaí a chóipeáil agus a ghreamú ar bhileog oibre, ach, anseo, labhróidh mé faoi mhodh úsáideach chun an post seo a réiteach nuair is gá táblaí iolracha a easpórtáil.

Easpórtáil na táblaí go léir ó chomhlacht teachtaireachta Outlook go bileog oibre Excel le cód VBA


Easpórtáil na táblaí go léir ó chomhlacht teachtaireachta Outlook go bileog oibre Excel le cód VBA

Cuir an cód VBA seo a leanas i bhfeidhm le do thoil chun na táblaí go léir a easpórtáil ó chomhlacht teachtaireachta amháin go bileog oibre Excel.

1. Oscail an teachtaireacht gur mian leat na táblaí a easpórtáil, agus ansin coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Modúil fhuinneog.

Cód VBA: Easpórtáil na táblaí go léir ón gcomhlacht teachtaireachta go barr feabhais bileog oibre:

Sub ImportTableToExcel()
Dim xMailItem As MailItem
Dim xTable As Word.Table
Dim xDoc As Word.Document
Dim xExcel As Excel.Application
Dim xWb As Workbook
Dim xWs As Worksheet
Dim I As Integer
Dim xRow As Integer
On Error Resume Next
Set xExcel = New Excel.Application
Set xWb = xExcel.Workbooks.Add
xExcel.Visible = True
Set xWs = xWb.Sheets(1)
xRow = 1
For Each xMailItem In Application.ActiveExplorer.Selection
    Set xDoc = xMailItem.GetInspector.WordEditor
    For I = 1 To xDoc.Tables.Count
        Set xTable = xDoc.Tables(I)
        xTable.Range.Copy
        xWs.Paste
        xRow = xRow + xTable.Rows.Count + 1
        xWs.Range("A" & CStr(xRow)).Select
    Next
Next
End Sub

táblaí onnmhairiúcháin doc ar fheabhas 1

3. Tar éis an cód thuas a ghreamú, fós sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil uirlisí > tagairtí dul go dtí an Tagairtí-Tionscadal1 bosca dialóige, agus seiceáil Leabharlann Réada Microsoft Word agus Leabharlann Réada Microsoft Excel roghanna ón Tagairtí atá ar Fáil bosca liosta, féach an scáileán:

táblaí onnmhairiúcháin doc ar fheabhas 2

4. Ansin cliceáil OK cnaipe chun an bosca dialóige a fhágáil, agus anois, le do thoil F5 eochair chun an cód a rith, rinneadh na táblaí go léir sa chorp teachtaireachta a onnmhairiú chuig leabhar oibre nua mar a thaispeántar an pictiúr a leanas:

táblaí onnmhairiúcháin doc ar fheabhas 3


Cúntóir Ríomhphoist AI in Outlook: Freagraí níos Cliste, Cumarsáid níos soiléire (draíocht aon-cliceáil!) SAOR

Sruthlaigh do thascanna Outlook laethúla leis an Cúntóir Mail AI ó Kutools le haghaidh Outlook. Foghlaimíonn an uirlis chumhachtach seo ó do ríomhphoist roimhe seo chun freagraí cliste agus cruinne a thairiscint, chun ábhar do ríomhphoist a bharrfheabhsú, agus chun cabhrú leat teachtaireachtaí a dhréachtú agus a fheabhsú gan stró.
doc ai láimhseáil ríomhphoist

Tacaíonn an ghné seo le:

  • Freagraí Cliste: Faigh freagraí ó do chomhráite san am a chuaigh thart - in oiriúint, beacht, agus réidh le dul.
  • Ábhar Feabhsaithe: Déan do théacs ríomhphoist a bheachtú go huathoibríoch ar mhaithe le soiléireacht agus tionchar.
  • Comhdhéanamh gan stró: Just a chur ar fáil eochairfhocail, agus lig AI láimhseáil an chuid eile, le stíleanna scríbhneoireachta iolracha.
  • Eisínteachtaí Chliste: Leathnaigh do chuid smaointe le moltaí atá feasach ar an gcomhthéacs.
  • Achoimre: Faigh forbhreathnú gonta ar ríomhphoist fhada láithreach.
  • Global Reach: Aistrigh do ríomhphoist go teanga ar bith gan stró.

Tacaíonn an ghné seo le:

  • Freagraí ríomhphoist cliste
  • Ábhar optamaithe
  • Dréachtanna bunaithe ar eochairfhocail
  • Síneadh ábhar Chliste
  • Achoimre ríomhphoist
  • Aistriúchán ilteangach

Is fearr ar fad, tá an ghné seo go hiomlán saor go deo! Ná fan -íoslódáil Cúntóir Ríomhphoist AI anois agus bain sult as!


Uirlisí Táirgiúlachta Oifige is Fearr

Breaking News: Kutools le haghaidh Outlook Seolann Leagan saor in aisce!

Taithí a dhéanamh ar an Kutools uile-nua le haghaidh Outlook Leagan SAOR IN AISCE le 70+ gnéithe dochreidte, is féidir leatsa a úsáid go deo! Cliceáil le híoslódáil anois!

🤖 Kutools AI : Úsáideann sé ardteicneolaíocht AI chun ríomhphoist a láimhseáil gan stró, lena n-áirítear ríomhphoist a fhreagairt, a achoimriú, a bharrfheabhsú, a leathnú, a aistriú agus a chumadh.

📧 Uathoibriú Ríomhphoist: Auto Reply (Ar fáil le haghaidh POP agus IMAP)  /  Sceideal Seol Ríomhphoist  /  Auto CC/BCC de réir Rialacha Agus Ríomhphost á Sheoladh  /  Auto Ar Aghaidh (Ardrialacha)   /  Beannacht Auto Cuir leis   /  Scoilt Ríomhphoist Ilfhaighteoirí go huathoibríoch i dTeachtaireachtaí Aonair ...

📨 Bainistíocht Ríomhphost: Ríomhphoist a Athghairm  /  Bloc Ríomhphoist Scam ag Ábhair agus Daoine Eile  /  Scrios Ríomhphoist Dúblacha  /  Cuardach Casta  /  Comhdhlúthaigh Fillteáin ...

📁 Ceangaltáin ProSábháil Baisc  /  Baisc Dícheangail  /  Comhbhrú Baisc  /  Auto Sábháil   /  Auto Dícheangail  /  Comhbhrúite Auto ...

🌟 Draíocht Chomhéadain: 😊Níos mó Emojis Pretty and Cool   /  Cuir i gcuimhne duit nuair a thagann ríomhphoist thábhachtacha  /  Íoslaghdaigh Outlook In ionad Deiridh ...

???? Wonders aon-cliceáil: Freagair Gach Duine le Ceangaltáin Isteach  /   Ríomhphoist Frith-Iascaireachta  /  🕘 Taispeáin Crios Ama an tSeoltóra ...

👩🏼‍🤝‍👩🏻 Teagmhálaithe & Féilire: Baisc Cuir Teagmhálacha Ó Ríomhphoist Roghnaithe  /  Roinn Grúpa Teagmhála ar Ghrúpaí Aonair  /  Bain Meabhrúcháin Breithlá ...

Díghlasáil láithreach Kutools le haghaidh Outlook le cliceáil amháin -saor go buan. Ná fan, íoslódáil anois agus cuir le d’éifeachtúlacht!

kutools le haghaidh gnéithe dearcadh1 kutools le haghaidh gnéithe dearcadh2