Come cancellare tutte le categorie da Outlook?
Supponendo che ci siano molti elementi applicati alla categoria del colore in Outlook. Se devi cancellare tutte queste categorie dagli elementi, come potresti gestire questo lavoro in modo rapido e semplice in Outlook?
Cancella tutte le categorie da una cartella specifica con la funzione Cancella tutte le categorie
Cancella tutte le categorie da un account specifico con il codice VBA
Cancella tutte le categorie da una cartella specifica con la funzione Cancella tutte le categorie
Se hai solo bisogno di cancellare le categorie in una cartella specifica, fai come segue:
1. Fare clic sulla cartella da cui si desidera rimuovere le categorie di colore, quindi premere Ctrl + A per selezionare tutti gli elementi.
2. Quindi fare clic con il pulsante destro del mouse e quindi scegliere Classificare > Cancella tutte le categorie dal menu contestuale, vedi screenshot:
3. E poi, tutte le categorie di colori in questa cartella specifica sono state cancellate contemporaneamente.
Cancella tutte le categorie da un account specifico con il codice VBA
Per cancellare tutte le categorie da tutti gli elementi, come e-mail, attività, contatti, note e così via da un account, il codice VBA sottostante può farti un favore:
1. Fare clic sull'e-mail di un account da cui si desidera pulire tutte le categorie, quindi tenere premuto il tasto ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Modulie incolla la seguente macro nel file Moduli Finestra.
Codice VBA: cancella tutte le categorie da un account specifico:
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. Quindi, premere F5 tasto per eseguirlo, quindi viene visualizzata una finestra di messaggio per ricordarti che tutte le categorie dell'account selezionato sono state cancellate, vedi screenshot:
I migliori strumenti per la produttività in ufficio
Kutools for Outlook - Oltre 100 potenti funzionalità per potenziare il tuo Outlook
🤖 Assistente di posta AI: E-mail istantanee professionali con la magia dell'intelligenza artificiale: risposte geniali con un solo clic, tono perfetto, padronanza multilingue. Trasforma l'e-mail senza sforzo! ...
???? Automazione di posta elettronica: Fuori sede (disponibile per POP e IMAP) / Pianifica l'invio di e-mail / CC/BCC automatico in base alle regole durante l'invio di e-mail / Inoltro automatico (regole avanzate) / Aggiunta automatica di saluto / Suddividi automaticamente le email con più destinatari in singoli messaggi ...
📨 gestione e-mail: Richiama facilmente le email / Blocca le email truffe per soggetto e altri / Elimina email duplicate / Ricerca avanzata / Consolidare cartelle ...
📁 Allegati Pro: Salvataggio in batch / Stacca batch / Comprimi in lotti / Salvataggio automatico / Scollegamento automatico / Comprimi automaticamente ...
🌟 Magia dell'interfaccia: 😊Più emoji carini e fantastici / Aumenta la tua produttività in Outlook con le visualizzazioni a schede / Riduci a icona Outlook invece di chiuderlo ...
👍 Meraviglie con un clic: Rispondi a tutti con gli allegati in arrivo / E-mail anti-phishing / 🕘Mostra il fuso orario del mittente ...
👩🏼🤝👩🏻 Contatti e calendario: Aggiungi in batch contatti dalle email selezionate / Dividere un gruppo di contatti in singoli gruppi / Rimuovi promemoria compleanno ...
Al di sopra Caratteristiche 100 Attendi la tua esplorazione! Clicca qui per scoprire di più.