Bagaimana Mengirim Semua E-mel Terbuka dan Tersusun dalam Outlook Anda

Setelah selesai menyusun beberapa e-mel di Outlook, anda mungkin berharap dapat menghantarnya dalam satu masa. Sekarang, dalam artikel ini, kami akan mengajar anda cara mendapatkannya dengan bantuan kod VBA.

Sebagai contoh, anda telah melengkapkan beberapa e-mel baru tetapi tidak menghantarnya, hanya membiarkannya terbuka. Dan selepas itu, anda mahu menghantarnya. Secara umum, anda harus mengklik butang "Kirim" di setiap e-mel satu persatu. Dalam keadaan ini, anda mesti menginginkan kaedah yang dapat membantu anda menghantar semua e-mel terbuka dan tersusun secara pukal.

Berikut ini, kami akan mendedahkan cara yang berkesan kepada anda. Ia menggunakan VBA. jika anda tidak menggunakan VBA, anda boleh merujuk artikel - "Cara Menjalankan Kod VBA di Outlook Anda"Sementara itu.

Batch Hantar Semua E-mel Terbuka dan Tersusun

1. Sebagai permulaan, anda boleh menyusun e-mel anda seperti biasa dan membukanya.
2. Kemudian, tekan "Alt + F11" untuk mengakses editor VBA.
3. Seterusnya, di tetingkap baru, salin kod VBA berikut ke dalam modul.

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. Selepas itu, cetuskan makro ini sama ada dengan menekan butang kekunci "F5" secara langsung.
5. Akhirnya, apabila makro selesai, anda akan dimaklumkan mengenai jumlah e-mel yang akan dihantar.
6. Sekarang, buka Peti Masuk, di mana anda dapat melihat bahawa semua e-mel yang dibuka sebelumnya sedang dihantar.

Pulihkan Outlook dari Kerosakan Tidak dijangka

Adakah anda pernah menghadapi rasuah Outlook sebelum ini? Ramai pengguna telah mengalami masalah ini dan telah mengadu tentangnya. Secara umum, jika anda membuat penyelesaian tepat pada masanya dan berkesan, anda dapat dengan mudah mengambil data Outlook dari PST yang rosak fail. Sebagai contoh, jika anda mempunyai data Outlook yang dikemas kini, anda boleh kembali ke sandaran dengan mudah. Sudah tentu, anda boleh menggunakan alat pembaikan yang sangat baik dan boleh dipercayai, seperti DataNumen Outlook Repair, yang dapat mengimbas fail Outlook yang rosak dan memulihkan data maksimum.

Pengenalan Pengarang:

Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk pemulihan sql dan produk perisian pembaikan prospek. Untuk maklumat lebih lanjut, lawati www.datanumen.com