Mae cwcis yn ein helpu i gyflwyno ein gwasanaethau. Drwy ddefnyddio ein gwasanaethau, rydych yn cytuno i'n defnydd cwcis.
Tip: Mae ieithoedd eraill yn Google-Cyfieithu. Gallwch ymweld â'r English fersiwn o'r ddolen hon.
Mewngofnodi
x
or
x
x
cofrestr
x

or

Sut i glirio pob categori o Outlook?

Yn rhagdybio, mae llawer o eitemau'n cael eu cymhwyso i'r categori lliw yn eich Outlook. Os oes angen i chi glirio'r holl gategorïau hyn o'r eitemau, sut y gallech ddelio â'r swydd hon yn gyflym ac yn hawdd yn Outlook?

Clirwch bob categori o ffolder penodol gyda nodwedd Clear All Categories

Clirwch bob categori o gyfrif penodol gyda chod VBA


Clirwch bob categori o ffolder penodol gyda nodwedd Clear All Categories

Os oes angen i chi glirio'r categorïau mewn ffolder penodol, gwnewch fel hyn:

1. Cliciwch ar y ffolder yr hoffech chi gael gwared ar y categorïau lliw, ac yna pwyswch Ctrl + A i ddewis yr holl eitemau.

2. Yna cliciwch dde, ac yna dewiswch Categoreiddio > Clir Pob Categori O'r ddewislen cyd-destun, gweler y sgrin:

doc clir categori 1

3. Ac yna, mae'r holl gategorïau lliw yn y ffolder penodol hwn wedi'u clirio ar unwaith.


Clirwch bob categori o gyfrif penodol gyda chod VBA

Er mwyn clirio pob categori o bob eitem, fel negeseuon e-bost, tasgau, cysylltiadau, nodiadau ac yn y blaen o gyfrif, gall y cod VBA isod chi wneud o blaid:

1. Cliciwch ar e-bost cyfrif eich bod chi eisiau glanhau pob categori, ac yna dal i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlau Ffenestr.

Cod VBA: Clirwch bob categori o gyfrif penodol:

Is-BatchClearAllCategories_AllOutlookItems () Dim xCurrentFolder Fel Outlook.Folder Dim xFolder Fel Ffolder, xCurFolder Fel Ffolder Dim xPos Fel Integer Dim xRootFldName Fel String Set xCurFolder = Outlook.ActiveExplorer.CurrentFolder xPos = InStr (3, xCurFolder.FolderPath, "\") Os xPos > 0 Yna xRootFldName = Canol (xCurFolder.FolderPath, 3, xPos - 3) Else xRootFldName = Canol (xCurFolder.FolderPath, 3, Len (xCurFolder.FolderPath) - 2) Diwedd Os Set xCurrentFolder = Outlook.Application.Session.Folders ( xRootFldName) Ar gyfer pob xFolder Yn xCurrentFolder.Folders Call ProcessBolders (xFolder) Nesaf MsgBox "Clir wedi'i gwblhau!", vbInformation + vbOKOnly, "Kutools for Outlook" End Sub Sub ProcessFolders (ByVal CurFld As Outlook.Folder) Dim xItem Fel Object Dim i As Integer Dim xSubfolder As Outlook.Folder Os CurFld.Items.Count> 0 Yna Am i = CurFld.Items.Count I 1 Step -1 Set xItem = CurFld.Items.Item (i) xItem.Categories = "" xItem.Save Next Diwedd Os Os CurFld.Folders.Count = XNUM X Yna Eithriad Ymadael ar gyfer pob XSubfolder Yn CurFld.Folders Call ProcessFolders (xSubfolder) Nesaf Diwedd Is

3. Yna, pwyswch F5 yn allweddol i'w redeg, ac yna mae blwch prydlon wedi'i datgelu i'ch atgoffa chi i bob categori o'r cyfrif a ddewiswyd wedi'u clirio, gweler y sgrin:

doc clir categori 2



Kutools ar gyfer Outlook

Mwy na Swyddogaethau Uwch 100 ar gyfer Outlook 2010, 2013, 2016, 2019 a 365

sgrinio kutools ar gyfer rhagolygon bach ar gyfer baner 201812

Mwy o Nodweddion | Lawrlwythiad Am Ddim | $ 39.00 yn unig ar gyfer cannoedd o swyddogaethau

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.