Slik begrenser du antall e-poster som åpnes samtidig med Outlook VBA

Outlook-løsninger September 29, 2025

Å ha mange e-poster åpne samtidig kan overbelaste Outlook, noe som kan føre til at Outlook krasjer. Derfor anbefales det å begrense antall åpne e-poster i mellomtiden. Dette innlegget vil lære deg hvordan du kan gjøre det med Outlook VBA.

Outlook er utsatt for å krasje når det blir overbelastet, for eksempel når for mange e-poster åpnes samtidig. Derfor bør du bare holde begrensede e-poster åpne om gangen. Selv om Outlook ikke støtter dette naturlig, kan du enkelt oppnå det på følgende måter.

Begrens antall e-poster som åpnes samtidig med Outlook VBA

Begrens antall e-poster som åpnes på samme tid

  1. Start Outlook-programmet helt fra starten av.
  2. Da må du få tilgang til VBA-editoren. Du kan skifte til "Utvikler"-fanen og trykke på "Visual Basic" -knappen. Eller bare trykk "Alt + F11"-tastene på hovedskjermen.
  3. I det påfølgende "Microsoft Visual Basic for Applications"-vinduet kan du finne og åpne "ThisOutlookSession"-prosjektet.
  4. Deretter bør du kopiere og lime inn VBA-koden nedenfor i dette VBA-prosjektet.
Public WithEvents objInspectors As Outlook.Inspectors

Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objInspectors_NewInspector(ByVal objNewInspector As Inspector)
    Dim objInspector As Outlook.Inspector
    Dim i As Long
    Dim strMsg As String
    Dim nPrompt As Integer
 
    i = 0
    If objNewInspector.CurrentItem.Class = olMail Then
 
       If objInspectors.count > 5 Then
          For Each objInspector In objInspectors
              If objInspector.CurrentItem.Class = olMail Then
                 i = i + 1
              End If
          Next
 
          If i > 5 Then
             strMsg = "You're allowed to open 5 emails at the same time. The previous email is closed!"
 
             MsgBox strMsg, vbExclamation + vbOKOnly
 
             ActiveInspector.CurrentItem.Close olSave
          End If
 
      End If
    End If
End Sub

VBA-kode - Begrens antall e-poster som åpnes på samme tid

  1. Etter det bør du signere denne makroen.
  • Trykk på "Verktøy"-knappen i verktøylinjen.
  • Velg deretter alternativet "Digital signatur" fra rullegardinlisten.
  • I popup-dialogboksen følger du instruksjonene på skjermen for å fullføre den.
  1. Senere kan du endre makroinnstillinger for å tillate digitalt signerte makroer.
  2. Til slutt kan du starte Outlook-programmet på nytt for å aktivere makroen.
  3. Fra nå av, hver gang du har tenkt å åpne den sjette e-posten, vil du få en melding, som skjermbildet:Advarsel
  4. Også den forrige e-posten vil bli lukket automatisk.

Hent verdifulle Outlook-data

Det kan ikke benektes at Outlook har mengder av bemerkelsesverdige funksjoner. Men det betyr ikke at den er feilfri. Den kommer fortsatt ikke unna med skader. Ulike faktorer kan føre til korrupsjon i Outlook. Derfor, for å gjenopprette Outlook data enklere, bør du sikkerhetskopiere PST-filen med jevne mellomrom. Dessuten er et reparasjonsverktøy av god kvalitet også et spørsmål om nødvendighet, som DataNumen Outlook Repair.

Forfatterintroduksjon:

Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert fikse mdf og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med

Kommentarer er stengt.