როგორ სწრაფად მივიღოთ დანართების საერთო რაოდენობა შერჩეულ Outlook ელ.წერილებში

ოდესმე მოგეთხოვათ ელ.ფოსტის დანართების რაოდენობის დათვლა არჩეულ წერილებში? დამღლელი იქნება, თუ მათ ხელით დათვლით. აქ ჩვენ დაგეხმარებით Outlook VBA-ით დათვლა ბევრად უფრო ადვილი და სწრაფი გახადოთ.

გარკვეული მიზეზების გამო, შეიძლება დაგჭირდეთ Outlook-ის ელფოსტებში დანართების რაოდენობის დათვლა. თუ უბრალოდ გსურთ ერთ ელფოსტაში დანართების რაოდენობის მიღება, ეს საკმაოდ მარტივი იქნება. მაგრამ თუ გსურთ რამდენიმე ელფოსტაში დანართების დათვლა, ხელით დათვლა ძალიან პრობლემური იქნება. ზოგადად, ერთ-ერთი ყველაზე გავრცელებული გზაა ყველა დანართის თქვენს კომპიუტერში ლოკალურ საქაღალდეში შენახვა. შემდეგ მონიშნეთ ისინი და Windows Explorer სტატუსის ზოლში გაჩვენებთ არჩეული ელემენტების რაოდენობას.

თუმცა, არ შეიძლება უარვყოთ, რომ ეს მეთოდი ჯერ კიდევ საკმაოდ რთულია. სინამდვილეში, Outlook VBA-ის საშუალებით, თქვენ შეგიძლიათ სწრაფად მიიღოთ დანართების მთლიანი რაოდენობა არჩეულ Outlook ელფოსტაში. წაიკითხეთ, რომ გაიგოთ დეტალური VBA კოდები და ნაბიჯები.

სწრაფად მიიღეთ დანართების ჯამური რაოდენობა არჩეულ წერილებში

1. თავდაპირველად, გაუშვით Outlook აპლიკაცია და გადადით "დეველოპერი" ჩანართზე.
2. შემდეგ შეგიძლიათ დააჭიროთ ღილაკს "Visual Basic". ის მიგიყვანთ "Microsoft Visual Basic აპლიკაციებისთვის" ფანჯარაში.
3. შემდეგ თქვენ უნდა გახსნათ ახალი მოდული, რომელიც არ გამოიყენება. აირჩიეთ "ჩასმა" > "მოდული".
4. ამის შემდეგ, თქვენ უნდა დააკოპიროთ და ჩასვათ მასში შემდეგი VBA კოდები.

Sub CountAttachmentsinSelectedEmails()
    Dim olSel As Selection
    Dim oMail As Object
    Dim AttCount As Long
    Dim strMsg As String
 
    Set olSel = Outlook.Application.ActiveExplorer.Selection
 
    For Each oMail In olSel
        'To confirm if the selected items are all emails
        If oMail.Class <> olMail Then
           strMsg = "Please select mail items only!"
           nRes = MsgBox(strMsg, vbOKOnly + vbExclamation)
           Exit Sub
        End If
        'Get the total number of the attachments in selected emails
        AttCount = oMail.Attachments.Count + AttCount
    Next
 
    strMsg = "There are " & AttCount & " attachments in the " & olSel.Count & " selected emails."
    nRes = MsgBox(strMsg, vbOKOnly + vbInformation, "Count Attachments")
End Sub

5. ამის შემდეგ, შეგიძლიათ გამოხვიდეთ Visual Basic-ის ფანჯრიდან და დაუბრუნდეთ Outlook-ის მთავარ ფანჯარას. შემდეგ თქვენ უნდა იპოვოთ და დააჭიროთ ქვევით ისარს სწრაფი წვდომის ინსტრუმენტთა პანელში და აირჩიეთ „მეტი ბრძანებები“ ჩამოსაშლელი სიიდან.
6. მოგვიანებით მიჰყევით ქვემოთ მოცემულ სურათზე ნაჩვენები ნაბიჯებს.
7. საბოლოოდ შეგიძლიათ სცადოთ.

• რამდენიმე ელფოსტის შერჩევის შემდეგ, შეგიძლიათ დააჭიროთ ახალ ღილაკს სწრაფი წვდომის ხელსაწყოთა ზოლში. ამის შემდეგ, თქვენ მიიღებთ შეტყობინებას, რომელიც გეტყვით დანართების რაოდენობას არჩეულ წერილებში. ეს გამოიყურება შემდეგ სურათს:
• მაგრამ თუ ელ.ფოსტის ნაცვლად აირჩევთ ნებისმიერ ელემენტს, რომელიც წარმოადგენს შეხვედრის მოთხოვნებს ან პასუხებს, თქვენ მიიღებთ გაფრთხილებას, როგორც ქვემოთ მოცემულ სურათზე:

რეაგირება დროდადრო მსოფლმხედველობის პრობლემებზე

თუ თქვენ იყენებთ Outlook-ს ათწლეულების განმავლობაში, თქვენ უნდა შეგხვედროთ მრავალი პრობლემა, მათ შორის, Outlook-ის არ რეაგირება, Outlook-ის გაყინვა, ხშირი შეცდომის შეტყობინებები და Outlook PST ელფოსტის კორუფცია და ა.შ. უკვე დახვეწეთ რაიმე ხრიკი მათ მოსაგვარებლად? ზოგადად, შეგიძლიათ Outlook-ის უსაფრთხო რეჟიმში გაშვება, Outlook-ის ახალი პროფილის შექმნა, ოფისის აღდგენა და მესამე მხარის დანამატების გამორთვა და ა.შ. გარდა ამისა, ასევე ახლოს უნდა გქონდეთ ძლიერი აღდგენის ინსტრუმენტი, როგორიცაა DataNumen Outlook Repair. ის გამოდგება მაშინ, როდესაც სარეზერვო ასლები და შემოსულების შეკეთების ინსტრუმენტი ვერ ხერხდება.

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

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