Outlook VBA-мен бір уақытта ашылған электрондық пошта санын қалай шектеуге болады

Outlook шешімдері Қыркүйек 29, 2025
Қазір бөлісу:

Бір уақытта бірнеше электрондық поштаны ашық ұстау Outlook бағдарламасының шамадан тыс жүктелуіне әкелуі мүмкін, бұл Outlook бағдарламасының істен шығуына әкелуі мүмкін. Сондықтан, осы уақытта ашылатын электрондық пошталар санын шектеу ұсынылады. Бұл жазба сізге Outlook VBA көмегімен мұны қалай жүзеге асыру керектігін үйретеді.

Outlook шамадан тыс жүктелген кезде, мысалы, тым көп электрондық пошта бір уақытта ашылған кезде бұзылуға бейім. Сондықтан шектеулі электрондық пошталарды бір уақытта ғана ашық ұстағаныңыз жөн. Outlook бағдарламасы бұны жергілікті деңгейде қолдамаса да, оған келесі құралдар арқылы оңай қол жеткізуге болады.

Outlook VBA-мен бір уақытта ашылған электрондық пошта санын шектеңіз

Бір уақытта ашылған электрондық пошта санын шектеңіз

  1. Ең басында Outlook бағдарламаңызды іске қосыңыз.
  2. Содан кейін сіз VBA редакторына кіруіңіз керек. Сіз «Әзірлеуші» қойындысына ауысып, «Visual Basic» батырмасын басуыңызға болады. Немесе негізгі экрандағы «Alt + F11» пернелерін басыңыз.
  3. Келесі «Бағдарламаларға арналған Microsoft Visual Basic» терезесінде «ThisOutlookSession» жобасын тауып ашуға болады.
  4. Әрі қарай сіз төмендегі VBA кодын осы VBA жобасына көшіріп, қоюыңыз керек.
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 коды - бір уақытта ашылған электрондық пошта санын шектеу

  1. Осыдан кейін сіз осы макросқа қол қоюыңыз керек.
  • Құралдар тақтасындағы «Құралдар» батырмасын басыңыз.
  • Әрі қарай ашылмалы тізімнен «Сандық қолтаңба» опциясын таңдаңыз.
  • Қалқымалы диалог терезесінде оны аяқтау үшін экрандағы нұсқауларды орындаңыз.
  1. Кейінірек макро параметрлерін цифрлық қолтаңбалы макростарға өзгерту үшін өзгертуге болады.
  2. Ақырында, макросты іске қосу үшін Outlook қолданбаңызды қайта іске қосуға болады.
  3. Бұдан былай алтыншы электрондық поштаны ашқыңыз келген сайын сізге скриншот сияқты хабарлама келеді:ескерту
  4. Алдыңғы электрондық пошта автоматты түрде жабылады.

Бағалы Outlook деректерін шығарып алыңыз

Outlook-тің керемет ерекшеліктері бар екенін жоққа шығаруға болмайды. Бірақ бұл оның мінсіз екенін білдірмейді. Ол әлі де зақымданудан құтыла алмайды. Outlook-тағы сыбайластыққа әр түрлі факторлар әкелуі мүмкін. Демек, солай Outlook бағдарламасын қалпына келтіру деректерді жеңілдету қажет, PST файлының сақтық көшірмесін белгілі бір уақыт аралығында жасау керек. Сондай-ақ, сапалы жөндеу құралы да қажеттілік мәселесі болып табылады DataNumen Outlook Repair.

Автордың кіріспесі:

Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. mdf түзету және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com

Қазір бөлісу:

Пікірлер жабылды.