Si të hapni emailet e pranuara/dërguara në modalitetin "Edit" automatikisht me Outlook VBA

Zgjidhjet e Outlook Shtator 29, 2025

Për të ndryshuar trupin e një email-i të marrë ose të dërguar në Outlook, duhet ta hapni atë dhe pastaj ta kaloni në modalitetin "Redakto". Nëse shpesh keni nevojë të bëni modifikime në email-e të tilla, do të dëshironi t'i hapni ato automatikisht në Modalitetin "Redakto". Ky postim do t'ju ndihmojë ta bëni këtë.

Ndonjëherë, mund t'ju duhet të ndryshoni përmbajtjen e një email-i të marrë ose të dërguar në Outlook. Në këtë skenar, siç u prezantua në postimin e mëparshëm - "Si të modifikoni subjektin dhe trupin e emaileve të pranuara në Outlook", duhet të hapni emailin dhe të klikoni butonin "Veprimet" dhe të zgjidhni "Modifiko mesazhin" për ta kthyer emailin në modalitetin "Ndrysho". Megjithatë, ju mund të mendoni se është ende pak e mundimshme. Prandaj, dëshironi që Outlook të hapë gjithmonë emailet e pranuara/dërguara në modalitetin "Edit". Më pas, ne do të prezantojmë se si të përdorim kodin VBA për të arritur këtë funksion. Tani lexoni për të marrë hapat e detajuar.

Redakto mesazhin

Hapni automatikisht emailet e pranuara/dërguara në modalitetin "Ndrysho".

  1. Që në fillim, duke iu referuar "Si të ekzekutoni kodin VBA në Outlook tuaj", hyni në redaktorin VBA të Outlook.
  2. Pastaj, kopjoni dhe ngjisni kodin e mëposhtëm VBA në projektin "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

Kodi VBA - Hap automatikisht emailet e pranuara/dërguara në modalitetin "Ndrysho".

  1. Më pas, klikoni në makron "Application_Startup" dhe shtypni butonin "F5".
  2. Aktualisht, mbyllni redaktorin VBA.
  3. Më në fund, mund të provoni. Thjesht klikoni dy herë në një postë të marrë ose të dërguar për ta hapur atë. Me siguri do të jetë në modalitetin "Edit".Email-et në modalitetin "Ndrysho".

Imun nga humbja e të dhënave të Outlook

A është bërë ndonjëherë skedari juaj PST i paarritshëm? Në realitet, skedari PST i Outlook mund të korruptohet lehtësisht. Për shembull, viruset me email mund të çojnë lehtësisht në rrëzimin e Outlook dhe në këtë mënyrë të rezultojnë në korrupsion të të dhënave të Outlook. Në raste të tilla, zgjidhja e parë që ju ndodh në mendje mund të jetë mjet për riparimin e kutisë hyrëse. Megjithatë, në përgjithësi, ajo është e paaftë për t'u përballur me situata të tilla serioze. Prandaj, sugjerohet gjithmonë të kopjoni skedarët PST në intervale të rregullta, në mënyrë që të mund të rivendosni të dhënat e PST nga kopjet rezervë si një tapë. Përndryshe, ju duhet të ktheheni në një mjet të jashtëm të specializuar, si p.sh DataNumen Outlook Repair.

Hyrje e autorit:

Shirley Zhang është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë rikuperimi mdf dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com

Komentet janë të mbyllura.