როგორ ავტომატურად ამოიღოთ პრეფიქსი „RE“ ან „FW“ თემაში ელ.ფოსტის პასუხის ან გადამისამართებისას

Outlook Solutions სექტემბერი 29, 2025

როდესაც თქვენ ცდილობთ უპასუხოთ ან გადააგზავნოთ ელ.წერილი ღილაკების „პასუხის“, „პასუხის ყველა“ ან „გადამისამართების“ დაჭერით, ელ. ფოსტის სათაურის წინ უნდა იყოს დამატებული „RE“ ან „FW“ პრეფიქსი. ეს სტატია გეტყვით, თუ როგორ უნდა მისცეთ Outlook-ს ავტომატური ამოღება VBA-ით.

ჩვენს წინა სტატიაში - "Outlook ელ.ფოსტის გაგზავნის 2 მეთოდი Subject-ში „FW“ პრეფიქსის გარეშე”, შეგიძლიათ მიიღოთ ორი გამოსავალი ელ.ფოსტის გადამისამართებისთვის „FW“–ს გარეშე. ისინი ხელახლა აგზავნიან ელ.წერილს და ქმნიან სწრაფ ნაბიჯს, შესაბამისად. აშკარაა, რომ ორივე ვერ მოგცემთ საშუალებას ავტომატურად წაშალოთ „FW“ თუ „Respond“ ჯგუფში იყენებთ ნორმალურ „Forward“ ღილაკს.

ამიტომ, ნაგულისხმევად, თუ გსურთ ამოიღოთ „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.

ავტორი შესავალი:

შირლი ჟანგი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის დაზიანებული mdf db-ის შეკეთება და Outlook სარემონტო პროგრამული პროდუქტები. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად