Hur man automatiskt expanderar alla mappar via VBA när Starting i ditt Outlook

Flera användare hoppas att alla mappar kan utvidgas automatiskt när de startar sin Outlook. I verkligheten stöder Outlook inte det. För att inse det måste du alltså använda VBA-kod. Detta post ger dig en snabbguide.

Du kan ha skapat många undermappar under standardmapparna i Outlook. Med tanke på så många mappar, för att snabbt komma åt dem när som helst, kanske du vill behålla alla mappar utökade hela tiden. Det första steget måste vara att få Outlook att automatiskt expandera mapparna på startup. Uppenbarligen finns det inte en sådan inbyggd funktion i Outlook. Således måste du använda makron. Därefter lär vi dig att uppnå det med VBA. När det gäller hur man tillämpar VBA kan du hänvisa till en annan artikel - “Hur du kör VBA-kod i din Outlook".

Expandera alla mappar automatiskt när Starför Outlook

  1. Till att börja med trycker du på "Alt + F11" i Outlook för att komma åt VBA-redigeraren.
  2. Sedan, i det nya fönstret, placera koden i projektet “ThisOutlookSession”.
'Expandera automatiskt alla mappar på startup Privat underapplikation_Startup () Ring ExpandAllFolders Avsluta Sub Private Sub ExpandAllFolders () Dim objCurrentFolder Som Outlook.Folder Dim objStore Som Outlook.Store Dim objFileFolders As Outlook.Folders Dim objFolder As Outlook.Folder Ställ in objCurrentFolder = Application.ActiveExplorer.CurrentFolder 'Bearbeta alla e-postkonton i din Outlook för varje objStore i Outlook.Application.Session.Stores Ställ in objFileFolders = objStore.GetRootFolder.Folders för varje objFolder I objFileFolders Ring LoopFolders (objFolder) Nästa DoEvents Ställ in Application.ActiveExplorer.CurrentFolder = objCurrentFolder Nästa Slut SubVarare Outlook.Folder) Dim objSubfolder Som Outlook.Folder Ställ in Application.ActiveExplorer.CurrentFolder = objCurFolder DoEvents 'Bearbeta alla undermappar rekursivt Om objCurFolder.Folders.Count> 0 Sedan för varje objSubfolder I objCurFolder.Folders Ring LoopFolders (slut If objubmapp)

VBA-kod - Expandera alla mappar automatiskt när Starför Outlook

  1. Stäng sedan VBA-redigeraren.
  2. Avsluta sedan Outlook-programmet ordentligt.
  3. Senare, start din Outlook. Vid denna tidpunkt körs makrot automatiskt.
  4. Efter Outlook starts upp kan du se att alla mappar har expanderats, som visas i figuren nedan.Alla mappar expanderas

Håll alla skadliga makron borta

Har du någonsin fått e-postmeddelanden som bifogas misstänkta filer eller är inbäddade med okända länkar? När du konfronterar sådana e-postmeddelanden måste du vanligtvis höja din vaksamhet. Du borde aldrig lita på dem eftersom de kan ha virus. När du har laddat ner bilagorna eller öppnat länkarna kan inte bara Outlook utan även datorn attackeras. Vid den tiden måste du reparera Outlook fil. Det kan vara ganska knotigt om du inte har en uppdaterad Outlook-säkerhetskopia eller använder ett kraftfullt återställningsverktyg, till exempel DataNumen Outlook Repair.

Författarintroduktion:

Shirley Zhang är expert på dataåterställning DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive SQL Server korruption och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com

Kommentarer är stängda.