Sommige Outlook-gebruikers geven er de voorkeur aan om hun e-mails te categoriseren volgens de contactkleurcategorieën van de afzenders. Het handmatig toewijzen van de categorie moet omslachtig zijn. In dit artikel wordt uitgelegd hoe u dit automatisch kunt realiseren met Outlook VBA.
Om uw werkefficiëntie in Outlook te verbeteren, zult u zich inspannen om uw e-mails beter te beheren. Zonder enige twijfel is "Kleurcategorieën" in dit opzicht een goede eigenschap. Veel gebruikers gebruiken het liever om hun e-mails te ordenen en te onderscheiden. De concrete basis voor het categoriseren van kleur in e-mails is natuurlijk aan uw persoonlijke gewoonten. Sommige gebruikers hebben bijvoorbeeld hun contacten in kleur gecategoriseerd, daarom hopen ze hun e-mails te categoriseren op basis van de contactcategorieën van de afzenders. Als u dit handmatig doet, zal het absoluut rommelig zijn omdat u eerst de contactcategorieën van de afzender moet controleren en deze vervolgens handmatig aan de e-mail moet toewijzen.
Om aan deze vereiste te voldoen, kunt u eigenlijk gebruik maken van Outlook VBA, waarmee Outlook automatisch de contactcategorieën van de afzender kan controleren en aan de nieuwe e-mails kan toewijzen. Als u geïnteresseerd bent in deze functie, lees dan verder om de uitgebreide stappen en codes te krijgen.
Categoriseer de inkomende e-mails automatisch op basis van de contactcategorieën van de afzenders
- Start in de eerste plaats Outlook en druk op de toetsen "Alt + F11".
- Vervolgens verschijnt het VBA-editorvenster, waarin u het "ThisOutlookSession" -project moet zoeken en openen.
- Kopieer en plak vervolgens de volgende VBA-codes in "ThisOutlookSession".
Public WithEvents olItems As Outlook.Items Private Sub Application_Startup () Set olItems = Outlook.Application.Session.GetDefaultFolder (olFolderInbox) .Items End Sub Private Sub olItems_ItemAdd (ByVal Item As Object) Dim oMail As MailItem Dim olContacts As Outlook.Items Dim obj As Object Dim objVariant As Variant Dim olCategory As String Set olContacts = Outlook.Application.Session.GetDefaultFolder (olFolderContacts) .Items Als TypeOf Item MailItem is, stel dan in oMail = Item voor elk object In olContacts Als TypeOf obj ContactItem is, stel dan objVariant = obj If ObjVariant.Email1Address = oAddressEmail.Sender olCategory = objVariant.Categories oMail.Categories = olCategory End If End If Next End If End Sub
- Vervolgens moet u een digitaal certificaat aan de nieuwe macro toewijzen.
- Maak eerst een nieuw certificaat aan via digitale certificaten voor VBA-projecten.
- Onderteken deze code vervolgens digitaal.
- Daarna kunt u uw Outlook-macrobeveiliging wijzigen en alleen de digitaal ondertekende macro's toestaan.
- Eindelijk kun je restart Outlook om de nieuwe macro te activeren. Vanaf nu worden alle inkomende e-mails die in de map Inbox binnenkomen, automatisch gecategoriseerd op basis van de contactcategorieën van de afzenders.
Los onverwachte Outlook-crash op
Hoewel veel gebruikers de voorkeur geven aan Outlook, kan de crash nog steeds niet worden verholpen. U moet paniek voelen wanneer u een onverwachte Outlook-crash ondervindt. Maak je geen zorgen. U kunt acties ondernemen om de problemen zelf te diagnosticeren en op te lossen, zoals restarOutlook, invoegtoepassingen van derden uitschakelen, een nieuw e-mailprofiel maken en Office-suite repareren, enzovoort. Het ergste geval moet zijn corrupte Outlook PST-gegevens, die extreem knoestig is. In dit scenario moet u terugkeren naar een robuuste externe tool, zoals DataNumen Outlook Repair.
Auteur Introductie:
Shirley Zhang is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder reparatie corrupte SQL mdf db en Outlook-reparatiesoftwareproducten. Voor meer informatie bezoek www.datanumen.com
1