Outlook VBA-тай нэгэн зэрэг нээсэн имэйлийн тоог хэрхэн хязгаарлах вэ

Олон имэйлийг нэгэн зэрэг нээлттэй байлгах нь таны Outlook-г хэт ачаалж, улмаар Outlook-г эвдрэхэд хүргэдэг. Тиймээс энэ хугацаанд нээгдэх имэйлийн тоог хязгаарлахыг зөвлөж байна. Энэ бичлэг нь танд Outlook VBA ашиглан үүнийг хэрхэн хэрэгжүүлэхийг заах болно.

Хэт их имэйл нэгэн зэрэг нээгдэх гэх мэт хэт ачаалал ихтэй үед Outlook нь сүйрэх хандлагатай байдаг. Тиймээс та хязгаарлагдмал имэйлийг нэг удаа нээлттэй байлгасан нь дээр. Хэдийгээр Outlook нь үүнийг төрөлх хэлбэрээр нь дэмждэггүй боловч та дараахь аргаар хялбархан хүрч чадна.

Нэгэн зэрэг нээсэн имэйлийн тоог хязгаарлана уу

1. Хамгийн эхэнд Outlook програмаа эхлүүлээрэй.
2. Дараа нь та VBA редакторт хандах хэрэгтэй. Та "Developer" таб руу шилжиж "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

5. Үүний дараа та энэ макро дээр гарын үсэг зурах ёстой.

• Хэрэгслийн самбар дээрх "Tools" товчийг дарна уу.
• Дараа нь унах жагсаалтаас "Дижитал гарын үсэг" гэсэн сонголтыг сонгоно уу.
• Попап харилцах цонхонд дэлгэцэн дээрх зааврыг дагана уу.

6. Дараа нь дижитал гарын үсэгтэй макро зөвшөөрөхийн тулд макро тохиргоог өөрчилж болно.
7. Эцэст нь та макро идэвхжүүлэхийн тулд Outlook програмаа дахин эхлүүлж болно.
8. Одооноос зургаа дахь имэйлийг нээх гэж байх бүрт дэлгэцийн агшин шиг мессеж ирэх болно.
9. Мөн өмнөх имэйлийг автоматаар хаах болно.

Outlook-ийн үнэ цэнэтэй өгөгдлийг татаж авах

Outlook нь гайхалтай шинж чанаруудтай болохыг үгүйсгэхгүй. Гэхдээ энэ нь өөгүй гэсэн үг биш юм. Энэ нь эвдрэл гэмтлээс ангижрах боломжгүй хэвээр байна. Янз бүрийн хүчин зүйлүүд нь Outlook-ийн авлигад хүргэж болзошгүй юм. Тиймээс, тэгэхээр Outlook-г сэргээх өгөгдлийг хялбар болгохын тулд та өөрийн PST файлыг тодорхой хугацаанд нөөцлөх хэрэгтэй. Түүнчлэн, сайн чанарын засварын хэрэгсэл нь зайлшгүй шаардлагатай зүйл юм DataNumen Outlook Repair.

Зохиогчийн танилцуулга:

Ширли Жан бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. mdf-ийг засах програм хангамжийн бүтээгдэхүүнийг засах хэтийн төлөв. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com