Si të hiqni automatikisht prefiksin "RE" ose "FW" në Subject kur përgjigjeni ose përcjellni emaile

Zgjidhjet e Outlook Shtator 29, 2025

Kur përpiqeni t'i përgjigjeni ose t'i përcillni emailet duke shtypur butonin "Përgjigju", "Përgjigju të gjithëve" ose "Përpara", duhet të ketë prefiksin "RE" ose "FW" të shtuar në pjesën e përparme të temës së emailit. Ky artikull do t'ju tregojë se si të lejoni që Outlook t'i heqë ato automatikisht me VBA.

Në artikullin tonë të mëparshëm - "2 Metoda për të përcjellë emailet e Outlook pa parashtesën "FW" në Subject”, mund të merrni dy mënyra për të përcjellë emailet pa “FW”. Ata po ridërgojnë emailet dhe po krijojnë një hap të shpejtë "Përpara". Është e qartë se të dy nuk mund t'ju lejojnë të hiqni automatikisht "FW" nëse përdorni butonin normal "Përpara" në grupin "Përgjigju".

Prandaj, si parazgjedhje, nëse dëshironi të hiqni prefiksin "RE" ose "FW" në temë kur klikoni butonin "Përgjigju", "Përgjigjuni të gjithëve" ose "Përpara", duhet t'i fshini ato manualisht çdo herë. Do të jetë mjaft e mundimshme. Për fat të mirë, mund të përdorni Outlook VBA për të hequr automatikisht fjalët specifike në temën e postës. Lexoni për të arritur kodet dhe hapat e detajuar.

Heqni automatikisht parashtesën "FW" ose "RE" kur transferoni ose përgjigjeni email-e

Për të filluar, hapni Outlook dhe shkoni te skeda "Zhvillues".
Pastaj mund të gjeni dhe klikoni në butonin "Visual Basic".
Më pas në dritaren e re, duhet të klikoni dy herë në projektin "ThisOutlookSession".
Më pas, duhet të kopjoni dhe ngjisni kodet e mëposhtme VBA në të.

Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim strSubject As String
 
    If InStr(Item.Subject, "RE") > 0 Then
       'If you don't want the prompt,
       'You can remove the MsgBox line and its correspoding "Else … End If" lines.
       If MsgBox("Do you want to remove the prefix 'RE'?", vbYesNo) = vbYes Then
          strSubject = Replace(Item.Subject, "RE:", "", vbTextCompare)
       Else
          strSubject = Item.Subject
       End If
    End If
 
    If InStr(Item.Subject, "FW") > 0 Then
       If MsgBox("Do you want to remove the prefix 'FW'?", vbYesNo) = vbYes Then
          strSubject = Replace(Item.Subject, "FW:", "", vbTextCompare)
       Else
          strSubject = Item.Subject
       End If
    End If
 
    Item.Subject = Trim(strSubject)
    Item.Save
End Sub

Pas kësaj, duhet të nënshkruani një certifikatë dixhitale në këtë makro.
Më vonë mund të dilni nga dritarja "Visual Basic" dhe të konfiguroni Outlook për të aktivizuar vetëm makrot e nënshkruara dixhitale.
Më në fund mund të provoni.

Së pari, zgjidhni një email dhe shtypni butonin "Përgjigju", "Përgjigjuni të gjithëve" ose "Përpara".
Më pas do të hapet mesazhi i përgjigjes ose përcjelljes. Ju mund të shkruani postën si zakonisht.
Kur klikoni në butonin "Dërgo", do të merrni një kuti mesazhi, si pamja e mëposhtme e ekranit:
Nëse zgjidhni "Po", prefiksi "RE" ose "FW" do të hiqet automatikisht. Nëse zgjidhni "Jo", prefiksi nuk do të hiqet.

Çfarë nuk duhet bërë në trajtimin e postës elektronike të Outlook

Outlook është i cenueshëm, kështu që duhet të jeni të kujdesshëm kur trajtoni postat e Outlook. Për shembull, nëse merrni email nga burime të panjohura, më mirë mos e hapni, për të mos përmendur klikoni lidhjet e integruara ose shkarkoni skedarët e bashkangjitur. Ky lloj emaili mund të përmbajë makro me qëllim të keq, viruse ose malware, të cilët mund të shkatërrojnë të dhënat tuaja të Outlook menjëherë. Do të thotë se do të vuash Dëmtimi i skedarit të Outlook. Në atë pikë, vendpushimi juaj unik është të përdorni një mjet riparimi të fuqishëm dhe me reputacion, 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ë riparimi i korruptuar mdf db dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com