Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment effacer toutes les catégories d'Outlook?

En supposant que de nombreux éléments soient appliqués à la catégorie de couleur dans votre Outlook. Si vous devez supprimer toutes ces catégories des éléments, comment pouvez-vous gérer ce travail rapidement et facilement dans Outlook?

Effacer toutes les catégories d'un dossier spécifique avec la fonction Effacer toutes les catégories

Effacer toutes les catégories d'un compte spécifique avec code VBA


Effacer toutes les catégories d'un dossier spécifique avec la fonction Effacer toutes les catégories

Si vous avez juste besoin d'effacer les catégories dans un dossier spécifique, procédez comme suit:

1. Cliquez sur le dossier dans lequel vous souhaitez supprimer les catégories de couleurs, puis appuyez sur Ctrl + A pour sélectionner tous les éléments.

2. Puis faites un clic droit, puis choisissez Classer par catégories > Effacer toutes les catégories à partir du menu contextuel, voir capture d'écran:

doc clear catégorie 1

3. Et puis, toutes les catégories de couleurs de ce dossier spécifique ont été effacées en même temps.


Effacer toutes les catégories d'un compte spécifique avec code VBA

Pour effacer toutes les catégories de tous les éléments, tels que les e-mails, les tâches, les contacts, les notes, etc. d'un compte, le code VBA ci-dessous peut vous rendre service:

1. Cliquez sur un compte de messagerie dont vous souhaitez nettoyer toutes les catégories, puis maintenez la touche enfoncée. ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Moduleet collez la macro suivante dans le Module Fenêtre.

Code VBA: Effacer toutes les catégories d'un compte spécifique:

Sub BatchClearAllCategories_AllOutlookItems () Dim xCurrentFolder As Outlook.Folder Dim xFolder En tant que dossier, xCurFolder En tant que dossier Dim xPos En tant qu'entité > 3 Then xRootFldName = Mid (xCurFolder.FolderPath, 0, xPos - 3) Sinon xRootFldName = Mid (xCurFolder.FolderPath, 3, Len (xCurFolder.FolderPath) - 3). xRootFldName) Pour chaque xFolder dans xCurrentFolder.Folders Appelez ProcessFolders (xFolder) Suivant MsgBox "Effacement terminé!", vbInformation + vbOKOnly, "Kutools for Outlook" End Sub Sub ProcessFolders (ByVal CurFld As Outlook.Folder) Dim xItem As Object Dim i As Entier Dim xSubfolder comme Outlook.Folder Si CurFld.Items.Count> 2 Alors pour i = CurFld.Items.Count En 0 Étape -1 Définissez xItem = CurFld.Items.Item (i) xItem.Catégories = "" xItem.Save Next End If If CurFld.Folders.Count = XNUM X Puis quittez Sub pour chaque sous-dossier dans CurFld.Folders, appelez ProcessFolders (xSubfolder), puis cliquez sur Suivant.

3. Puis appuyez F5 clé pour l’exécuter, puis une boîte de dialogue s’affiche pour vous rappeler que toutes les catégories du compte sélectionné ont été effacées, voir la capture d’écran:

doc clear catégorie 2


Kutools for Outlook - Apporte les fonctionnalités avancées de 100 à Outlook et simplifie grandement le travail!

  • CC automatique / BCC par les règles lors de l'envoi d'email; Transfert automatique Emails multiples par coutume; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse mail est dans la liste BCC; Rappeler lorsque des pièces jointes sont manquantes, et plus encore, rappelle les fonctionnalités ...
  • Répondre (tous) avec toutes les pièces jointes dans la conversation par courrier; Répondre à beaucoup d'emails en secondes; Ajout automatique de message d'accueil quand répondez; Ajouter la date au sujet ...
  • Outils de pièce jointe: Gérer toutes les pièces jointes dans tous les courriers, Auto Detach, Compresser tout, Renommer tout, Sauvegarder tout ... Rapport rapide, Compter les mails sélectionnés...
  • Puissants courriers indésirables par la coutume; Supprimer les e-mails et les contacts en double... Vous permet de faire plus intelligemment, plus rapidement et mieux dans Outlook.
tir kutools perspectives onglet kutools 1180x121
tir kutools perspectives kutools plus onglet 1180x121
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.