ზოგჯერ შეიძლება დაგჭირდეთ გამოთვალოთ მიმღებთა საერთო რაოდენობა კონკრეტულ ელფოსტაში. მაგრამ Outlook-ს არ აქვს აშკარა „დათვლის“ ფუნქცია მის მხარდასაჭერად. ასე რომ, ეს სტატია შემოგთავაზებთ 2 მიდგომას მის მისაღწევად.
ზოგიერთ სიტუაციაში, მაგალითად, როდესაც თქვენ დაამატეთ მიმღების დიდი რაოდენობა ელფოსტას და გიჭირთ მათი მართვა, გსურთ მიიღოთ ამ მიმღებთა საერთო რაოდენობა. მაგრამ Outlook-ს არ აქვს მშობლიური ან ნაგულისხმევი მხარდაჭერა დასათვლელად. აქედან გამომდინარე, თქვენ მოგიწევთ დამატებითი ძალისხმევა მის მისაღწევად. აქ ჩვენ გეტყვით 2 მეთოდს.
მეთოდი 1: დათვალეთ მიმღებთა რაოდენობა საკონტაქტო ჯგუფის მეშვეობით
- დასაწყისისთვის, თქვენ უნდა აირჩიოთ ყველა მიმღები „მიმღები“, „CC“ და „BCC“ ველებში და დააკოპიროთ ისინი შეტყობინების ტექსტის ცარიელ ადგილას.
- შემდეგ აირჩიეთ სხეულის ყველა მიმღები და დააკოპირეთ ისინიც.
- შემდეგ გადადით Outlook კონტაქტების პანელზე და დააჭირეთ ღილაკს "ახალი საკონტაქტო ჯგუფი". ამომხტარ ფანჯარაში დააყენეთ სახელი როგორც „ტემპი“ და შემდეგ დააწკაპუნეთ „წევრების დამატება“ და ჩამოსაშლელი სიიდან აირჩიეთ „მისამართების წიგნიდან“.
- ამის შემდეგ, ჩასვით ადრე დაკოპირებული მიმღებები ველში „წევრი ->“, როგორც შემდეგი ეკრანის სურათი:
- ამის შემდეგ დააჭირეთ ღილაკს "OK" და დაუბრუნდით საკონტაქტო ჯგუფს. ყველა დუბლიკატი ავტომატურად წაიშლება. ახლა შეინახეთ იგი ადგილობრივ დისკზე, როგორც "ტექსტური" ფაილი.
- მოგვიანებით გახსენით ტექსტური ფაილი და ამოიღეთ უსარგებლო სათაური, როგორც ქვემოთ მოცემული სურათი:
- და ბოლოს, შეგიძლიათ კურსორი განათავსოთ ბოლო ხაზზე. სტატუსის ზოლში ნახავთ ხაზების მთლიან რაოდენობას. ეს არის მიმღებთა საერთო რაოდენობა.
მეთოდი 2: დათვალეთ მიმღებთა რაოდენობა Outlook VBA-ით
- თავდაპირველად დააჭირეთ "Alt + F11" ღილაკებს "Visual Basic" ფანჯარაში შესასვლელად.
- შემდეგ დააკოპირეთ და ჩასვით შემდეგი VBA კოდები ახალ მოდულში.
Sub CountRecipients()
Dim obApp As Outlook.Application
Dim olSel As Selection
Dim olItem As MailItem
Dim Recips As Recipients
Dim strMsg As String
Dim nRes As Integer
Set obApp = Outlook.Application
If TypeName(obApp.ActiveWindow) = "Inspector" Then
Set olItem = obApp.ActiveInspector.CurrentItem
Set Recips = olItem.Recipients
strMsg = "The current message contains " & Recips.Count & " recipient(s)."
nRes = MsgBox(strMsg, vbOKOnly + vbInformation, "Count Recipients")
Else
Set olItem = obApp.ActiveExplorer.Selection.Item(1)
Set Recips = olItem.Recipients
strMsg = "The selected message contains " & Recips.Count & " recipient(s)."
nRes = MsgBox(strMsg, vbOKOnly + vbInformation, "Count Recipients")
End If
Set obApp = Nothing
Set olSel = Nothing
Set olItem = Nothing
Set Recips = Nothing
End Sub
- ამის შემდეგ, შეგიძლიათ გამოხვიდეთ Visual Basic-ის ფანჯრიდან და დაამატოთ ახალი მაკრო Outlook-ის მთავარი ფანჯრის სწრაფი წვდომის ინსტრუმენტთა პანელში და შეტყობინებების ფანჯარაში.
- საბოლოოდ შეგიძლიათ სცადოთ:
- როდესაც ირჩევთ ელ.წერილს და დააჭერთ ღილაკს სწრაფი წვდომის ხელსაწყოთა ზოლში, მიიღებთ შეტყობინებას, როგორიცაა შემდეგი სურათი:
- როდესაც გახსნით ელფოსტას და დააწკაპუნებთ ღილაკზე, მიიღებთ დიალოგურ ფანჯარას, რომელიც ნაჩვენებია ქვემოთ მოცემულ სურათზე:
შენიშვნა: ეს მეთოდი კონტაქტურ ჯგუფს განიხილავს როგორც ერთ მიმღებს და არ გვერდს აუვლის დუბლიკატ მიმღებებს.
ბრძოლა საშიში მაკროების წინააღმდეგ
როგორც ყველამ ვიცით, ელექტრონული ფოსტით გავრცელებული ვირუსები მონაცემების ერთ-ერთი ყველაზე გავრცელებული საფრთხეა. ამიტომ, სასიცოცხლოდ მნიშვნელოვანია Outlook-ის კონფიგურაცია მხოლოდ ციფრულად ხელმოწერილი მაკროების ჩასართავად, რომლებსაც შეუძლიათ ვირუსების და მავნე პროგრამების დაბლოკვა. გარდა ამისა, უმჯობესია შეინარჩუნოთ საიმედო... დაზიანებული Outlook ფაილის შეკეთების პროგრამა, როგორიცაა DataNumen Outlook Repair. ის გამოგადგებათ, როდესაც თქვენი Outlook განიცდის ვირუსულ ინფექციას ან მავნე პროგრამულ შეტევას.
ავტორი შესავალი:
შირლი ჟანგი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის SQL mdf მონაცემთა შეცდომის შეკეთება და Outlook სარემონტო პროგრამული პროდუქტები. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად