Paano Buksan ang Mga Natanggap/Naipadalang Email sa Mode na "I-edit" Awtomatikong gamit ang Outlook VBA

Para baguhin ang katawan ng isang natanggap o naipadalang email sa Outlook, kailangan mo itong buksan at pagkatapos ay i-on ito sa "Edit" mode. Kung madalas mong kailangang gumawa ng mga pagbabago sa mga naturang email, gugustuhin mong awtomatikong buksan ang mga ito sa "Edit" Mode. Ang post na ito ay makakatulong sa iyo na maunawaan ito.

Kung minsan, maaaring kailanganin mong baguhin ang nilalaman ng isang natanggap o ipinadalang email sa Outlook. Sa sitwasyong ito, gaya ng ipinakilala sa nakaraang post – “Paano Baguhin ang Paksa at Katawan ng Mga Natanggap na Email sa Outlook", kailangan mong buksan ang email at i-click ang "Mga Pagkilos" na buton at piliin ang "I-edit ang Mensahe" upang i-convert ang email sa mode na "I-edit". Gayunpaman, maaari mong isipin na medyo mahirap pa rin ito. Samakatuwid, nais mong palaging buksan ng Outlook ang mga natanggap/ipinadalang email sa mode na "I-edit". Pagkatapos noon, ipapakilala namin kung paano gamitin ang VBA code para makamit ang function na ito. Ngayon basahin upang makakuha ng mga detalyadong hakbang.

Buksan ang Mga Natanggap/Naipadalang Email sa Awtomatikong Mode na "I-edit."

1. Sa pinakadulo simula, na may kaugnayan sa "Paano Patakbuhin ang VBA Code sa Iyong Outlook“, i-access ang Outlook VBA editor.
2. Pagkatapos, kopyahin at i-paste ang sumusunod na VBA code sa proyektong "ThisOutlookSession".

Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objMailInspector As Outlook.Inspector

Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

'Get the email window
Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is MailItem Then
       Set objMailInspector = Inspector
    End If
End Sub

Private Sub objMailInspector_Activate()
    Dim objMail As Outlook.MailItem
 
    Set objMail = objMailInspector.CurrentItem
    'If it is a recieved/sent mail instead of a new email
    If Not (objMail.Recipients Is Nothing) And Not (objMail.Sender Is Nothing) Then
       'open in "Edit" mode
       objMailInspector.CommandBars.ExecuteMso ("EditMessage")
    End If
End Sub

3. Pagkatapos, mag-click sa macro na "Application_Startup" at pindutin ang "F5" key.
4. Sa kasalukuyan, isara ang editor ng VBA.
5. Sa wakas, maaari mong subukan. I-double click lang sa isang natanggap o ipinadalang mail para buksan ito. Ito ay tiyak na nasa mode na "I-edit".

Immune mula sa Outlook Data Loss

Hindi na ba naa-access ang iyong PST file? Sa katotohanan, ang Outlook PST file ay madaling masira. Halimbawa, ang mga virus na dala ng email ay madaling humantong sa pag-crash ng Outlook at sa gayon ay magreresulta sa pagkasira ng data ng Outlook. Sa ganitong mga kaso, ang unang resolusyon na nangyayari sa iyong isip ay maaaring tool sa pag-aayos ng inbox. Gayunpaman, sa pangkalahatan, hindi nito kayang harapin ang mga ganitong seryosong sitwasyon. Samakatuwid, palaging iminumungkahi na i-back up ang mga PST file sa mga regular na pagitan, upang maibalik mo ang data ng PST mula sa mga backup tulad ng isang tapon. Kung hindi, kailangan mong bumalik sa isang espesyal na panlabas na tool, tulad ng DataNumen Outlook Repair.

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