Өөрийн Outlook дээр нээлттэй болон зохиосон бүх имэйлийг хэрхэн багцаар илгээх вэ

Outlook дээр зарим имэйл бичиж дууссаны дараа тэдгээрийг нэг дор илгээнэ гэж найдаж болно. Одоо энэ нийтлэлд бид VBA кодын тусламжтайгаар үүнийг хэрхэн олж авахыг заах болно.

Жишээлбэл, та зарим шинэ имэйлийг бөглөсөн боловч илгээгээгүй, зүгээр л нээлттэй байлгадаг. Тэгээд дараа нь та тэднийг явуулахыг хүсч байна. Ерөнхийдөө та имэйл бүрт "Илгээх" товчийг нэг нэгээр нь дарах хэрэгтэй. Энэ нөхцөлд та бүх нээлттэй болон зохиосон имэйлийг бөөнөөр нь илгээх боломжийг танд олгох аргыг хүсэх ёстой.

Дараах хэсэгт бид ийм үр дүнтэй аргыг танд үзүүлэх болно. Энэ нь VBA ашиглаж байна. Хэрэв та VBA-г хэрхэн ашиглахаа мэдэхгүй бол нийтлэлээс лавлаж болно - "Таны Outlook дээр VBA кодыг хэрхэн ажиллуулах вэ”Гэсэн үг.

Бүх нээлттэй болон зохиосон имэйлийг багцаар илгээх

1. Эхлээд та имэйлээ ердийнхөөрөө бичиж, нээлттэй байлгаж болно.
2. VBA засварлагч руу нэвтрэхийн тулд "Alt + F11" товчийг дарна уу.
3. Дараа нь шинэ цонхонд дараах VBA кодыг модуль болгон хуулна уу.

Sub BatchSendOutAllOpenEmails()
    Dim objInspectors As Outlook.Inspectors
    Dim i As Long
    Dim objMail As Outlook.MailItem
    Dim lMailCount As Long
 
    'Get all open items in your Outlook
    Set objInspectors = Outlook.Application.Inspectors
 
    lMailCount = 0
    For i = objInspectors.Count To 1 Step -1
        If objInspectors.Item(i).CurrentItem.Class = olMail Then
           'Get all open emails
           Set objMail = objInspectors.Item(i).CurrentItem
 
           'Send out open emails that contain subject & recipients
           If objMail.Subject <> "" Then
              If objMail.Recipients.Count > 0 Then
                 objMail.Send
                 lMailCount = lMailCount + 1
              End If
           End If
        End If
    Next
 
    'Prompt you of the results
    MsgBox lMailCount & " open emails have been sent out!", vbInformation + vbOKOnly
End Sub

4. Үүний дараа "F5" товчийг шууд дарж энэ макрог идэвхжүүлнэ үү.
5. Эцэст нь, макро хийж дуусахад танд илгээх имэйлийн тоог асуух болно.
6. Одоо өмнө нь нээсэн бүх имэйл илгээгдэж байгааг харах боломжтой Outbox-ыг нээнэ үү.

Гэнэтийн эвдрэлээс хэтийн төлөвийг сэргээх

Та өмнө нь Outlook-ийн авлигатай тулгарч байсан уу? Олон хэрэглэгчид энэ асуудалд өртөж, гомдоллож байсан. Ерөнхийдөө, хэрэв та цаг тухайд нь, үр дүнтэй шийдлүүдийг хийвэл Outlook-ийн өгөгдлийг хялбархан олж авах боломжтой гэмтсэн PST файл. Жишээлбэл, хэрэв танд шинэчлэгдсэн Outlook өгөгдөл байгаа бол нөөцлөлт рүүгээ амархан буцаж болно. Мэдээжийн хэрэг, та маш сайн, найдвартай засварын хэрэгсэл гэх мэт тусламж авч болно DataNumen Outlook Repair, энэ нь гэмтсэн Outlook файлыг сканнердаж, хамгийн их өгөгдлийг сэргээх боломжтой.

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

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