Paano Mabilis na Maantala ang Pagpapadala ng Mga Tukoy na Email hanggang sa Mga Oras ng Paggawa sa Iyong Outlook

Kung kailangan mong pigilan ang iyong sarili sa pagpapadala ng mga partikular na email sa labas ng oras ng trabaho, maaari mong gamitin ang paraang ipinapakita sa artikulong ito. Maaari nitong hayaan ang Outlook na awtomatikong suriin kung nasa oras ng trabaho kapag nagpadala ka ng mga partikular na email at naantala ito hanggang sa mga oras ng trabaho.

Kung minsan, ang oras kung kailan ka nagsusulat at nagpapadala ng mail ay wala sa oras ng iyong trabaho. Sa kasong ito, maaari mong ipagpaliban ang pagpapadala ng email na ito hanggang sa mga susunod na oras ng trabaho. Sa pangkalahatan, maaari mong gamitin ang native na feature na “Delay Delivery” para maantala ang mga naturang email. Gayunpaman, sa pamamagitan nito, dapat mong tukuyin ang oras ng paghahatid sa bawat oras. Masyadong magulo. Pagkatapos noon, ibabahagi namin sa iyo ang isang piraso ng VBA code, na maaaring awtomatikong suriin kung ito ay nasa loob ng oras ng trabaho kapag nagpadala ka ng isang partikular na email at mabilis na antalahin ang pagpapadala nito hanggang sa mga oras ng trabaho.

Mabilis na Iantala ang Pagpapadala ng Mga Tukoy na Email hanggang sa Mga Oras ng Trabaho

1. Sa simula pa lamang, ilunsad ang iyong programa sa Outlook.
2. Pagkatapos ay sa umuusbong na pangunahing screen ng Outlook, maaari mong pindutin ang "Alt + F11" key.
3. Susunod na makakakuha ka ng access sa Outlook VBA editor sa tagumpay.
4. Pagkatapos nito, kailangan mong hanapin at buksan ang proyektong "ThisOutlookSession".
5. Kasunod, kopyahin ang sumusunod na VBA code sa window ng proyekto na ito.

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMail As MailItem
    Dim NewSendTime As String
    Dim bDelayMail As Boolean
    Dim nPrompt As Integer
 
    bDelayMail = True
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
 
       'Work on specific emails only
       'You can change the conditions as per your needs
       If objMail.Recipients.Item(1).Address = "boss@datanumen.com" Then
 
          Select Case Weekday(Date, vbMonday)
                 'Delay 2 days if today is Saturday
                 Case 6
                      NewSendTime = (Date + 2) & " 09:00:00"
                 'Delay 1 days if today is Saturday
                 Case 7
                      NewSendTime = (Date + 1) & " 09:00:00"
                 Case Else
                      If DatePart("h", Now) < 9 Then
                         'Delay to 9 o'clock if now is too early
                         NewSendTime = Date & " 09:00:00"
                      ElseIf DatePart("h", Now) > 18 Then
                         Select Case Weekday(Date, vbMonday)
                                'Delay 3 days if today is Friday and now is over 6 PM
                                Case 5
                                     NewSendTime = (Date + 3) & " 09:00:00"
                                'Delay to 9 o'clock if now is before 6 PM
                                Case Else
                                     NewSendTime = (Date + 1) & " 09:00:00"
                         End Select
                      Else
                         bDelayMail = False
                      End If
            End Select
 
            If bDelayMail = True And objMail.DeferredDeliveryTime = "1/1/4501" Then
               'Ask if to delay sending this email
               nPrompt = MsgBox("Outside Working Hours:" & vbCrLf & "Do you want to delay this email until " & NewSendTime & "?", vbYesNo + vbExclamation, "Delay Email")
 
               If nPrompt = vbYes Then
                  objMail.DeferredDeliveryTime = NewSendTime
               Else
                  objMail.DeferredDeliveryTime = "1/1/4501"
               End If
           End If
       End If
    End If
End Sub

6. Sa ibang pagkakataon, kakailanganin mong magtalaga ng digital certificate sa email na ito.
7. At pagkatapos ay baguhin ang iyong mga setting ng macro sa Outlook upang payagan ang mga nilagdaang macro.
8. Mula ngayon, sa tuwing magpapadala ka ng mga email na nakakatugon sa paunang natukoy na pamantayan, kung ito ay wala sa oras ng trabaho, makakatanggap ka ng prompt tulad ng sumusunod na larawan:
9. Kung pipiliin mo ang "Oo", iiskedyul ito ng Outlook na maipadala hanggang sa mga oras ng trabaho.

Pagsagip Mga Nasirang File ng Outlook

Ang Outlook ay nakakuha ng maraming papuri dahil sa napakaraming tampok nito. Gayunpaman, mayroon pa rin itong nakamamatay na kapintasan. Iyon ay ang Outlook ay madaling kapitan ng mga pagkakamali at katiwalian. Samakatuwid, dapat mong i-back up ang iyong mga file sa Outlook nang regular. Maiiwasan ka nitong makaranas ng masakit na pagkawala ng data ng Outlook. Bilang karagdagan, mas mabuting kumuha ka ng isang mahusay na tool sa pag-aayos, tulad ng DataNumen Outlook Repair, Kung saan maaari kumpunihin ang Outlook mga isyu sa loob ng ilang segundo.

Panimula ng May-akda:

Si Shirley Zhang ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang mdf paggaling at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa