Sut i symud neges e-bost i ffolder penodedig ar ôl darllen yn Outlook?

Mae symud neges e-bost i ffolder benodol ar ôl ei darllen yn ffordd orau o gadw'r ffolder Mewnflwch yn lân yn Outlook. I lawer o ddefnyddwyr Outlook, maent yn tueddu i greu rheol i'r e-byst darllen hyn symud. Mewn gwirionedd, nid yw Camre yn cefnogi'r broses dewin rheol hon. Yn yr erthygl hon, byddwn yn dangos i chi sut i symud negeseuon e-bost i ffolder penodedig ar ôl darllen gyda chod VBA yn Outlook.

Symud neges e-bost i ffolder penodedig ar ôl darllen yn Outlook

Symud neges e-bost i ffolder penodedig ar ôl darllen yn Outlook

Gallwch symud negeseuon e-bost i ffolder benodol ar ôl darllen gyda chod VBA rhedeg yn Outlook.

1. Yn gyntaf, mae angen i chi greu enw ffolder newydd “Adolygu”O dan y ffolder Mewnflwch.

2. Agorwch y ffolder Mewnflwch, yna pwyswch y Alt + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

3. Yna cliciwch ddwywaith i ehangu Project1 > Gwrthrychau Microsoft Outlook > SesiwnOutlook i agor y VbaProject.OTM golygydd.

4. Yna copïwch a gludwch y cod VBA isod i olygydd VbaProject.OTM fel y dangosir yn y screenshot uchod.

Cod VBA: symud negeseuon ar ôl eu darllen

Sub MoveInbox2Reviewed()
On Error Resume Next
Set oOutlook = CreateObject("Outlook.Application")
Set oNamespace = oOutlook.GetNamespace("MAPI")
Set oFolderSrc = oNamespace.GetDefaultFolder(olFolderInbox)
Set oFolderDst = oFolderSrc.Folders("Reviewed")
Set oFilteredItems = oFolderSrc.Items.Restrict("[UnRead] = False")
For Each oMessage In oFilteredItems
    oMessage.Move oFolderDst
Next
End Sub 

5. Yna cliciwch y Save botwm i arbed y cod VBA ac yna cau'r Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

6. De-gliciwch y Bar Offer Mynediad Cyflym, a dethol Addasu Bar Offer Mynediad Cyflym o'r ddewislen clicio ar y dde. Gweler y screenshot:

7. Yn y Dewisiadau Outlook blwch deialog, mae angen i chi:

1). Dewiswch Macros yn y Dewiswch orchmynion oddi wrth rhestr ostwng;

2). Dewiswch Prosiect1. ThisOutlookSession yn y blwch o dan y Dewiswch orchmynion oddi wrth rhestr ostwng;

3). Cliciwch y Ychwanegu botwm;

4). Cliciwch y OK botwm.

8. Yna gallwch weld y Macro botwm yn dangos yn y Bar Offer Mynediad Cyflym. Gwnewch yn siŵr eich bod chi'n lleoli yn y ffolder mewnflwch rydych chi am symud yr holl negeseuon darllen ohoni, yna cliciwch ar y Macro botwm i redeg y cod VBA y tu mewn i'r Mewnflwch.

Nodiadau:

1. Gellir defnyddio'r cod VBA hwn yn Outlook 2007, 2010 a 2013; Ond, yn Outlook 2007, gallwch glicio ar y Run botwm i redeg y cod.

2. Os oes sawl cyfrif e-bost yn bodoli yn eich Camre, dim ond yn y cyfrif y mae'r ffeil ddata wedi'i osod yn ddiofyn y gellir cymhwyso'r cod VBA. Gallwch wirio'r ffeil ddata ddiofyn trwy glicio Ffeil > Gwybodaeth > cyfrif Gosodiadau > cyfrif Gosodiadau i agor y cyfrif Gosodiadau blwch deialog. Yna ewch i'r Ffeil Data tab, fe welwch fod y ffeil ddata ddiofyn wedi'i marcio gan o'r blaen.

3. Os ydych chi am newid y ffeil ddata ddiofyn i gyfrif e-bost arall, dewiswch ac amlygwch y cyfrif rydych chi am ei osod yn ddiofyn, yna cliciwch ar y Osod fel ddiofyn yn y cyfrif Gosodiadau blwch deialog.

4. Wrth redeg y cod VBA ar y tro cyntaf a darganfod nad yw'r negeseuon darllen yn cael eu symud i gyd ar unwaith, daliwch i glicio ar y botwm Macro nes bod yr holl negeseuon darllen yn y Blwch Derbyn yn cael eu symud allan.

---

Offer Cynhyrchiant Swyddfa Gorau

Kutools ar gyfer Rhagolwg - Dros 100 o Nodweddion Pwerus i Werthu Eich Outlook

🤖 Cynorthwy-ydd Post AI: E-byst pro ar unwaith gyda hud AI - un clic i atebion athrylith, tôn berffaith, meistrolaeth amlieithog. Trawsnewid e-bostio yn ddiymdrech! ...

📧 E-bostio Automation: Allan o'r Swyddfa (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: Dwyn i gof E-byst yn Hawdd  /  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   /  Rhowch hwb i'ch Cynhyrchiant Outlook gyda Golygfeydd Tabbed  /  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 ...

Dros Nodweddion 100 Aros Eich Archwiliad! Cliciwch Yma i Ddarganfod Mwy.

Darllenwch fwy       Lawrlwythiad Am Ddim      prynu