Sut i ddidoli a grwpio yn ôl parth anfonwr yn Outlook?

Fel rheol, gallwn yn hawdd drefnu pob neges e-bost yn ôl anfonwr, categorïau, pynciau, maint, ac ati yn Microsoft Outlook. Fodd bynnag, mae'n ymddangos yn amhosibl didoli neu grwpio negeseuon e-bost yn ôl parthau anfonwyr, oherwydd nid oes maes parth Anfonwr ar gyfer negeseuon e-bost o gwbl. Yma, byddaf yn cyflwyno cod VBA i'ch helpu chi i ychwanegu colofn Parth ar gyfer negeseuon e-bost, yna didoli a grwpio'r negeseuon e-bost yn ôl y parthau anfonwr yn hawdd yn Outlook.

I ddidoli a grwpio negeseuon e-bost yn ôl parthau anfonwyr yn Microsoft Outlook 2013 a 2010, gwnewch fel a ganlyn:

Cam 1: Agorwch y ffolder post lle byddwch chi'n didoli pob neges e-bost yn ôl parthau anfonwyr.

Cam 2: Diffoddwch y Pane Darllen gyda chlicio ar y Pane Darllen > Oddi ar ar y Gweld tab.

Cam 3: Ewch ymlaen a chliciwch ar y Ychwanegu Colofnau ar y Gweld tab.

Cam 3: Yn y blwch deialog Show Columns, cliciwch y Colofn Newydd botwm.

Cam 4: Yn y blwch deialog Colofn Newydd, teipiwch y Parth yn y blwch Enw, a chadwch y Testun wedi'i ddewis yn y ddau math blwch a fformat blwch, o'r diwedd cliciwch y OK botwm.

Cam 5: Nawr eich bod chi'n cyrraedd yn ôl i'r blwch deialog Show Columns, dewiswch y Parth yn y Dangos y colofnau hyn yn y blwch archebu hwn, symudwch ef isod O eitem, a chliciwch ar y OK botwm.

Cam 6: Nawr eich bod chi'n mynd yn ôl i'r ffolder post agoriadol, dewiswch bob neges e-bost gyda phwyso'r Ctrl + A allweddi ar yr un pryd.

Cam 7: Pwyswch y Alt + F11 yn y cyfamser i agor ffenestr Microsoft Visual Basic for Applications; yna cliciwch ar y Mewnosod > Modiwlau, pastiwch y cod VBA canlynol i'r modiwl nesaf.

VBA: Trefnu a Grŵp yn ôl parth anfonwr

Sub ListSelectionDomain()
Dim aObj As Object
Dim oProp As Outlook.UserProperty
Dim sDomain
On Error Resume Next
For Each aObj In Application.ActiveExplorer.Selection
Set oMail = aObj
sDomain = Right(oMail.SenderEmailAddress, Len(oMail.SenderEmailAddress) - InStr(1, oMail.SenderEmailAddress, "@"))
Set oProp = oMail.UserProperties.Add("Domain", olText, True)
oProp.Value = sDomain
oMail.Save
Err.Clear
Next
End Sub

Cam 8: Rhedeg y cod VBA hwn gyda phwyso'r F5 allweddol neu Run botwm yn y Bar Offer.

Cam 9: Nawr mae parth pob anfonwr yn cael ei dynnu a'i lenwi i'r golofn Parth.

A. I ddidoli'r negeseuon e-bost yn ôl parthau anfonwyr, cliciwch pennawd Colofn Parth ar frig pob neges e-bost;

B. I grwpio'r negeseuon e-bost yn ôl parthau anfonwyr, cliciwch ar y dde ar bennawd Colofn Parth, a dewiswch y Grŵp Gan Y Maes Hwn o'r gwymplen. Gweler y llun sgrin isod:

Nodiadau:

(1) Mae'r cod VBA hwn yn gweithio'n dda yn Outlook 2013 a 2010, ond nid yw'n gweithio yn Outlook 2007.
(2) Gallwch arbed yr olygfa arfer yn hawdd gyda Sut i arbed a chopïo gosodiadau gweld i ffolderau eraill yn Outlook?

Erthygl Cysylltiedig

Sut i weld parth anfonwyr yn y rhestr bost yn Outlook?

---

Offer Cynhyrchiant Swyddfa Gorau

Newyddion Torri: Kutools ar gyfer Lansio Outlook Fersiwn am ddim!

Profwch y Kutools cwbl newydd ar gyfer Outlook Fersiwn AM DDIM gyda mwy na 70 o nodweddion anhygoel, un chi i'w defnyddio AM BYTH! Cliciwch i lawrlwytho nawr!

🤖 Kutools AI : Yn defnyddio technoleg AI uwch i drin e-byst yn ddiymdrech, gan gynnwys ateb, crynhoi, optimeiddio, ymestyn, cyfieithu a chyfansoddi e-byst.

📧 E-bostio Automation: Auto Reply (Ar gael ar gyfer POP ac IMAP)  /  Amserlen Anfon E-byst  /  Auto CC/BCC gan Reolau Wrth Anfon E-bost  /  Awto Ymlaen (Rheolau Uwch)   /  Auto Ychwanegu Cyfarchiad   /  Rhannwch E-byst Aml-Dderbynnydd yn Negeseuon Unigol yn Awtomatig ...

📨 Rheoli E-bost: E-byst Dwyn i gof  /  Rhwystro E-byst Sgam gan Bynciau ac Eraill  /  Dileu E-byst Dyblyg  /  Chwilio Manwl  /  Cydgrynhoi Ffolderi ...

📁 Ymlyniadau Pro: Arbed Swp  /  Swp Datgysylltu  /  Cywasgu Swp  /  Auto Achub   /  Datgysylltiad Auto  /  Cywasgiad Auto ...

🌟 Rhyngwyneb Hud: 😊Mwy o Emojis Pretty a Cŵl   /  Atgoffwch chi pan ddaw e-byst pwysig  /  Lleihau Outlook Yn lle Cau ...

???? Rhyfeddodau un clic: Ateb Pawb ag Ymlyniadau Dod i Mewn  /   E-byst Gwrth-Gwe-rwydo  /  🕘Dangos Parth Amser yr Anfonwr ...

👩🏼‍🤝‍👩🏻 Cysylltiadau a Chalendr: Swp Ychwanegu Cysylltiadau O E-byst Dethol  /  Rhannwch Grŵp Cyswllt i Grwpiau Unigol  /  Dileu Atgoffa Pen-blwydd ...

Datgloi Kutools ar unwaith ar gyfer Outlook gydag un clic -yn barhaol am ddim. Peidiwch ag aros, lawrlwythwch nawr a rhoi hwb i'ch effeithlonrwydd!

Rhestr Nodwedd o Kutools ar gyfer Outlook      Lawrlwythwch Fersiwn Am Ddim      Uwchraddio i Broffesiynol