Kuidas piirata Outlook VBA-ga samal ajal avatud meilide arvu

Outlooki lahendused September 29, 2025

Paljude meilide samaaegne avatuna hoidmine võib teie Outlooki üle koormata, mis võib viia Outlooki krahhini. Seetõttu on soovitatav piirata vahepeal avatud meilide arvu. See postitus õpetab teile, kuidas seda Outlook VBA abil teha.

Outlook on altid kokku jooksma, kui see on ülekoormatud, näiteks kui korraga avaneb liiga palju meile. Seetõttu on parem hoida korraga avatud ainult piiratud arv e-kirju. Kuigi Outlook seda algselt ei toeta, saate selle hõlpsalt saavutada järgmiste vahenditega.

Piirake Outlook VBA-ga korraga avatud meilide arvu

Piirake samal ajal avatud e-kirjade arvu

  1. Alguses käivitage oma Outlooki programm.
  2. Seejärel peate avama VBA redaktori. Saate liikuda vahekaardile "Arendaja" ja vajutada nuppu "Visual Basic". Või lihtsalt vajutage põhiekraanil klahve Alt + F11.
  3. Järgmises aknas "Microsoft Visual Basic for Applications" saate leida ja avada projekti "ThisOutlookSession".
  4. Järgmisena peaksite sellesse VBA projekti kopeerima ja kleepima alloleva VBA koodi.
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 kood – piirake samal ajal avatud meilide arvu

  1. Pärast seda peaksite sellele makrole alla kirjutama.
  • Klõpsake tööriistaribal nuppu "Tööriistad".
  • Järgmisena valige ripploendist suvand "Digiallkiri".
  • Järgige hüpikaknas dialoogiboksis selle lõpetamiseks ekraanil kuvatavaid juhiseid.
  1. Hiljem saate muuta makrosätteid, et lubada digitaalselt allkirjastatud makrosid.
  2. Lõpuks saate makro aktiveerimiseks oma Outlooki rakenduse taaskäivitada.
  3. Nüüdsest saate iga kord, kui kavatsete avada kuuenda e-kirja, sõnumi, nagu ekraanipilt:Hoiatus
  4. Samuti suletakse eelmine meil automaatselt.

Väärtuslike Outlooki andmete hankimine

Ei saa eitada, et Outlookil on palju märkimisväärseid funktsioone. Kuid see ei tähenda, et see oleks veatu. Kahjustustest see ikkagi ei pääse. Outlooki korruptsiooni võivad põhjustada mitmesugused tegurid. Seega, nii et Outlooki taastamine andmed on lihtsamad, peaksite oma PST-faili regulaarselt varundama. Samuti on vaja kvaliteetset remonditööriista, nagu DataNumen Outlook Repair.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas paranda mdf ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.