Ինչպե՞ս ինքնաբերաբար հեռացնել «RE» կամ «FW» նախածանցը Առարկայում ՝ նամակները պատասխանելիս կամ ուղարկելիս

Outlook լուծումներ Սեպտեմբեր 29, 2025

Երբ փորձում եք պատասխանել կամ փոխանցել նամակները «Պատասխանել», «Պատասխանել բոլորը» կամ «Փոխանցել» կոճակները սեղմելով ՝ էլփոստի թեմայի դիմաց պետք է ավելացվի «RE» կամ «FW» նախածանց: Այս հոդվածը ձեզ կասի, թե ինչպես թույլ տալ Outlook- ին ավտոմատ կերպով դրանք հեռացնել VBA- ով:

Մեր նախորդ հոդվածում ՝ «Առանց «FW» նախածանցի թեմայի Outlook էլփոստերը փոխանցելու 2 մեթոդ”, Առանց« FW »- ի էլ.փոստերը փոխանցելու համար կարող եք երկու լուծում ստանալ: Նրանք ուղարկում են էլ. Փոստերը և համապատասխանաբար ստեղծում «Առաջ» արագ քայլ: Ակնհայտ է, որ երկուսն էլ չեն կարող թույլ տալ ձեզ ավտոմատ կերպով հեռացնել «FW» - ն, եթե օգտագործեք «Փոխանցել» նորմալ կոճակը «Պատասխանել» խմբում:

Հետևաբար, եթե լռելյայն եք, եթե ցանկանում եք հեռացնել «RE» կամ «FW» նախածանցը վերնագրում «Պատասխանել», «Պատասխանել բոլորը» կամ «Փոխանցել» կոճակները սեղմելիս, ապա ամեն անգամ պետք է դրանք ձեռքով ջնջեք: Դա բավականին անհանգստացնող կլինի: Բարեբախտաբար, դուք կարող եք օգտագործել Outlook VBA- ն `փոստի թեմայում հատուկ բառերը ավտոմատ կերպով հեռացնելու համար: Կարդացեք ՝ մանրամասն կոդերին և քայլերին հասնելու համար:

Ավտոմատ հեռացրեք «FW» կամ «RE» նախածանցը էլփոստերը փոխանցելիս կամ պատասխանելիս

Սկսելու համար բացեք Outlook-ը և անցեք «Մշակող» ներդիրին։
Դրանից հետո կարող եք գտնել և սեղմել «Visual Basic» կոճակի վրա:
Նոր պատուհանում պետք է կրկնակի սեղմել «ThisOutlookSession» նախագիծը:
Դրանից հետո անհրաժեշտ է պատճենել և տեղադրել դրա մեջ հետևյալ VBA կոդերը:

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

Դրանից հետո դուք պետք է թվային սերտիֆիկատ ստորագրեք այս մակրոին:
Ավելի ուշ կարող եք դուրս գալ «Visual Basic» պատուհանից և կարգավորել Outlook- ը ՝ միացնելով միայն թվանշորեն մակագրված մակրոները:
Վերջապես կարող եք փորձել:

Նախ ընտրեք էլփոստը և սեղմեք «Պատասխանել», «Պատասխանել բոլորը» կամ «Փոխանցել» կոճակները
Այնուհետև կբացվի պատասխանող կամ փոխանցող հաղորդագրությունը: Փոստը կարող եք կազմել ինչպես միշտ:
«Ուղարկել» կոճակը սեղմելիս դուք կստանաք հաղորդագրության տուփ, ինչպես հետևյալ էկրանի նկարը.
Եթե ընտրեք «Այո», «RE» կամ «FW» նախածանցը ավտոմատ կերպով կհեռացվի: Եթե ընտրեք «Ոչ», նախածանցը չի հեռացվի:

Ինչ չի կարելի անել Outlook էլփոստի հետ գործ ունենալիս

Outlook- ը խոցելի է, ուստի պետք է զգույշ լինել Outlook- ի նամակները մշակելիս: Օրինակ, եթե անհայտ աղբյուրներից էլ-նամակներ եք ստանում, ավելի լավ է չբացեք այն, էլ չենք ասում ՝ սեղմեք ներկառուցված հղումները կամ ներբեռնեք կցված ֆայլերը: Այս տեսակի էլփոստերը կարող են պարունակել վնասակար մակրոներ, վիրուսներ կամ չարամիտ ծրագրեր, որոնք կարող են միանգամից փչացնել ձեր Outlook տվյալները: Դա նշանակում է, որ դուք կտուժեք Outlook ֆայլի վնասը, Այդ պահին ձեր եզակի հանգստավայրն է օգտագործել հզոր և հեղինակավոր վերանորոգման գործիք, ինչպիսին է DataNumen Outlook Repair.

Հեղինակի ներածություն.

Shirley Zhang- ը տվյալների վերականգման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում վերականգնել կոռումպացված mdf db և հեռանկարների նորոգման ծրագրակազմի արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com