Sådan begrænses antallet af åbnede e-mails på samme tid med Outlook VBA

Outlook-løsninger September 29, 2025

At have mange e-mails åbne på samme tid kan overbelaste din Outlook, hvilket kan føre til Outlook-nedbrud. Derfor anbefales det at begrænse antallet af åbne e-mails i mellemtiden. Dette indlæg vil lære dig, hvordan du gør det med Outlook VBA.

Outlook er tilbøjeligt til at gå ned, når det bliver overbelastet, såsom når for mange e-mails åbnes på samme tid. Derfor bør du kun holde begrænsede e-mails åbne ad gangen. Selvom Outlook ikke understøtter dette indbygget, kan du nemt opnå det på følgende måde.

Begræns antallet af åbnede e-mails på samme tid med Outlook VBA

Begræns antallet af åbnede e-mails på samme tid

  1. Start dit Outlook-program helt fra starten.
  2. Derefter skal du få adgang til VBA-editoren. Du kan skifte til "Developer" -fanen og trykke på "Visual Basic" -knappen. Eller tryk bare på "Alt + F11" -tasterne på hovedskærmen.
  3. I det efterfølgende “Microsoft Visual Basic for Applications” -vindue kan du finde og åbne projektet “ThisOutlookSession”.
  4. Dernæst skal du kopiere og indsætte VBA-koden nedenfor i dette VBA-projekt.
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 - Begræns antallet af åbnede e-mails på samme tid

  1. Derefter skal du underskrive denne makro.
  • Tryk på knappen "Værktøjer" i værktøjslinjen.
  • Vælg derefter "Digital signatur" fra rullelisten.
  • I popup-dialogboksen skal du følge instruktionerne på skærmen for at fuldføre den.
  1. Senere kan du ændre makroindstillinger for at tillade digitalt signerede makroer.
  2. Til sidst kan du genstarte dit Outlook-program for at aktivere makroen.
  3. Fra nu af, hver gang du har til hensigt at åbne de sjette e-mails, får du en besked, som skærmbilledet:Advarsel
  4. Den tidligere e-mail lukkes også automatisk.

Hent værdifulde Outlook-data

Der kan ikke benægtes, at Outlook har mængder af bemærkelsesværdige funktioner. Men det betyder ikke, at det er fejlfrit. Det kan stadig ikke komme væk med skader. Forskellige faktorer kan føre til korruption i Outlook. Derfor for at gendanne Outlook data lettere, skal du sikkerhedskopiere din PST-fil med jævne mellemrum. Også et reparationsværktøj af god kvalitet er også et spørgsmål om nødvendighed DataNumen Outlook Repair.

Forfatter Introduktion:

Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder rette mdf og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com

Kommentarer er lukket.