Ako obmedziť počet e-mailov otvorených súčasne s aplikáciou Outlook VBA

Záchrana dát z Outlooku, Riešenia pre Outlook Júla 10, 2017

Ak ponecháte otvorených veľa e-mailov súčasne, môže dôjsť k preťaženiu programu Outlook, čo vedie k zlyhaniu programu Outlook. Preto sa odporúča obmedziť počet e-mailov otvorených medzitým. Toto post vás naučí, ako to realizovať pomocou Outlooku VBA.

Outlook je náchylný na zlyhanie, keď sa preťaží, napríklad keď sa otvorí príliš veľa e-mailov súčasne. Preto by ste si mali nechať otvorené naraz iba obmedzený počet e-mailov. Hoci to Outlook natívne nepodporuje, môžete to ľahko dosiahnuť pomocou nasledujúcich prostriedkov.

Obmedzte počet súčasne otvorených e-mailov pomocou programu Outlook VBA

Obmedzte počet e-mailov otvorených v rovnakom čase

  1. Hneď na úvod starváš program Outlook.
  2. Potom musíte vstúpiť do editora VBA. Môžete prejsť na kartu „Vývojár“ a stlačiť tlačidlo „Visual Basic“. Alebo jednoducho stlačte klávesy „Alt + F11“ na hlavnej obrazovke.
  3. V nasledujúcom okne „Microsoft Visual Basic for Applications“ môžete nájsť a otvoriť projekt „ThisOutlookSession“.
  4. Ďalej by ste mali skopírovať a vložiť kód VBA nižšie do tohto projektu VBA.
Public WithEvents objInspectors Ako 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 = 0 If Current objNewInspector. olMail Potom Ak objInspectors.count > 5 Potom Pre každý objInspector V objInspectors If objInspector.CurrentItem.Class = olMail Potom i = i + 1 Koniec Ak Ďalej Ak i > 5 Then strMsg = "Môžete otvoriť 5 e-mailov súčasne čas. Predchádzajúci e-mail je uzavretý!" MsgBox strMsg, vbExclamation + vbOKOnly ActiveInspector.CurrentItem.Close olSave End If End If End If End Sub

Kód VBA - Obmedzte počet e-mailov otvorených súčasne

  1. Potom by ste mali toto makro podpísať.
  • Na paneli nástrojov stlačte tlačidlo „Nástroje“.
  • Potom z rozbaľovacieho zoznamu vyberte možnosť „Digitálny podpis“.
  • V rozbaľovacom dialógovom okne ho dokončite podľa pokynov na obrazovke.
  1. Neskôr môžete zmeniť nastavenia makier a povoliť tak digitálne podpísané makrá.
  2. Nakoniec môžete restarsvoju aplikáciu Outlook aktivovať makro.
  3. Odteraz vždy, keď máte v úmysle otvoriť šiesty e-mail, dostanete správu, ako je snímka obrazovky:Výstraha
  4. Tiež predchádzajúci e-mail sa automaticky uzavrie.

Načítajte cenné údaje programu Outlook

Nedá sa poprieť, že Outlook má množstvo pozoruhodných funkcií. To však neznamená, že je bezchybný. Stále nemôže uniknúť poškodeniu. Rôzne faktory môžu viesť k poškodeniu programu Outlook. Preto, aby obnoviť Outlook údaje, mali by ste svoj súbor PST zálohovať v pravidelných intervaloch. Nevyhnutnosťou je tiež kvalitný opravárenský nástroj, napr DataNumen Outlook Repair.

Úvod autora:

Shirley Zhang je expertkou na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane opraviť mdf a výhľadové softvérové ​​produkty na opravu. Pre viac informácií navštívte www.datanumen. S

Komentáre sú uzavreté.