Note: The other languages of the website are Google-translated. Back to English

 Conas gach catagóir a ghlanadh ó Outlook?

Ag rá, tá go leor earraí i bhfeidhm ar an gcatagóir dathanna i do Outlook. Más gá duit na catagóirí seo go léir a ghlanadh ó na míreanna, conas a d’fhéadfá déileáil leis an bpost seo go tapa agus go héasca in Outlook?

Glan gach catagóir ó fhillteán ar leith le gné Clear All Categories

Glan gach catagóir ó chuntas ar leith le cód VBA


Glan gach catagóir ó fhillteán ar leith le gné Clear All Categories

Mura gá duit ach na catagóirí a ghlanadh i bhfillteán ar leith, déan é seo le do thoil:

1. Cliceáil an fillteán a theastaíonn uait na catagóirí dathanna a bhaint, agus ansin brúigh Ctrl + A chun na míreanna go léir a roghnú.

2. Ansin cliceáil ar dheis, agus ansin roghnaigh Catagóiriú > Glan Gach Catagóir ón roghchlár comhthéacs, féach an scáileán:

doc catagóir 1 soiléir

3. Agus ansin, tá na catagóirí dathanna uile san fhillteán sonrach seo glanta ag an am céanna.


Glan gach catagóir ó chuntas ar leith le cód VBA

Chun gach catagóir a ghlanadh ó gach earra, mar ríomhphoist, tascanna, teagmhálacha, nótaí agus mar sin de ó chuntas, is féidir leis an gcód VBA thíos fabhar a dhéanamh duit:

1. Cliceáil ag r-phost cuntais ar mhaith leat gach catagóir a ghlanadh uaidh, 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 macra seo a leanas sa Modúil Fuinneog.

Cód VBA: Glan gach catagóir ó chuntas sonrach:

Sub BatchClearAllCategories_AllOutlookItems()
    Dim xCurrentFolder As Outlook.Folder
    Dim xFolder As Folder, xCurFolder As Folder
    Dim xPos As Integer
    Dim xRootFldName As String
    Set xCurFolder = Outlook.ActiveExplorer.CurrentFolder
    xPos = InStr(3, xCurFolder.FolderPath, "\")
    If xPos > 0 Then
        xRootFldName = Mid(xCurFolder.FolderPath, 3, xPos - 3)
    Else
        xRootFldName = Mid(xCurFolder.FolderPath, 3, Len(xCurFolder.FolderPath) - 2)
    End If
    Set xCurrentFolder = Outlook.Application.Session.Folders(xRootFldName)
    For Each xFolder In xCurrentFolder.Folders
        Call ProcessFolders(xFolder)
    Next
    MsgBox "Clear completed!", vbInformation + vbOKOnly, "Kutools for Outlook"
End Sub
Sub ProcessFolders(ByVal CurFld As Outlook.Folder)
    Dim xItem As Object
    Dim i As Integer
    Dim xSubfolder As Outlook.Folder
    If CurFld.Items.Count > 0 Then
        For i = CurFld.Items.Count To 1 Step -1
            Set xItem = CurFld.Items.Item(i)
            xItem.Categories = ""
            xItem.Save
        Next
    End If
    If CurFld.Folders.Count = 0 Then Exit Sub
    For Each xSubfolder In CurFld.Folders
        Call ProcessFolders(xSubfolder)
    Next
End Sub

3. Ansin, brúigh F5 eochair chun é a rith, agus ansin tá bosca pras popped amach chun a mheabhrú duit go bhfuil gach catagóir ón gcuntas roghnaithe glanta, féach an scáileán:

doc catagóir 2 soiléir


Kutools for Outlook - Tugann sé 100 Gné Ard le Outlook, agus Déan an Obair i bhfad Níos Éasca!

  • Auto CC / BCC de réir rialacha agus ríomhphost á sheoladh; Auto Ar Aghaidh Ríomhphoist Il de réir saincheaptha; Freagra Auto gan freastalaí malairte, agus gnéithe níos uathoibríoch ...
  • Rabhadh BCC - taispeáin teachtaireacht nuair a dhéanann tú iarracht gach ceann a fhreagairt má tá do sheoladh ríomhphoist ar liosta BCC; Meabhraigh Nuair a bhíonn Ceangaltáin ar Iarraidh, agus gnéithe meabhrúcháin níos mó ...
  • Freagra (Gach) Leis na Ceangaltáin Uile sa chomhrá poist; Freagair go leor Ríomhphost i soicindí; Beannacht Auto Cuir leis nuair a thabharfar freagra; Cuir Dáta leis san ábhar ...
  • Uirlisí Ceangail: Bainistigh Gach Ceangaltán i ngach Ríomhphost, Auto Dícheangail, Comhbhrú Gach, Athainmnigh Uile, Sábháil Gach ... Tuarascáil Thapa, Líon Ríomhphoist Roghnaithe...
  • Ríomhphoist Cumhachtacha Junk de réir saincheaptha; Bain Ríomhphoist agus Teagmhálacha Dúblacha... Cuir ar do chumas déanamh níos cliste, níos gasta agus níos fearr in Outlook.
kutools lámhaigh dearcadh kutools tab 1180x121
kutools lámhaigh dearcadh kutools móide cluaisín 1180x121
 
Sórtáil tuairimí de réir
Comments (0)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Níl aon tráchtanna curtha suas anseo go fóill

Lean orainn

Cóipcheart © 2009 - www.extendoffice.com. | Gach ceart ar cosaint. Cumhachtaithe ag ExtendOffice. | léarscáil an tSuímh
Is trádmharcanna nó trádmharcanna cláraithe de chuid Microsoft Corporation sna Stáit Aontaithe agus / nó i dtíortha eile iad lógó Office agus Office.
Cosanta ag Sectigo SSL