როგორ აჩვენოთ დანართის რაოდენობა ელ.ფოსტის სიაში Outlook VBA-ით

გააზიარე ახლა:

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

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

აჩვენეთ დანართის რაოდენობა ელფოსტის სიაში Outlook VBA-ით

აჩვენეთ დანართის რაოდენობა ელფოსტის სიაში

  1. დასაწყებად, გაუშვით თქვენი Outlook აპლიკაცია.
  2. შემდეგ დააჭირეთ "Alt + F11" ღილაკებს Outlook-ის მთავარ ფანჯარაში.
  3. შემდეგ ახალ Outlook VBA რედაქტორის ფანჯარაში, თქვენ უნდა გახსნათ მოდული, რომელიც არ გამოიყენება.
  4. ამის შემდეგ, დააკოპირეთ და ჩასვით შემდეგი VBA კოდი ამ მოდულში.
Sub AutoCountAttachments(objMail As Outlook.MailItem)
    Dim objAttachments As Outlook.Attachments
    Dim objProperties As Outlook.UserProperties
    Dim objProperty As Outlook.UserProperty
    Dim strPropertyName As String
 
    Set objAttachments = objMail.Attachments
 
    strPropertyName = "Attachment Count"
    Set objProperties = objMail.UserProperties
 
    'Check if there is already a column in this name
    Set objProperty = objProperties.Find(strPropertyName, True)
    If objProperty Is Nothing Then
       'If not, add this column
       Set objProperty = objProperties.Add(strPropertyName, olText, True)
    End If
 
    'Set the column value equal to the count of attachments
    objProperty.value = objAttachments.Count
    objMail.Save
End Sub

VBA კოდი - აჩვენეთ დანართების რაოდენობა ელფოსტის სიაში

  1. ამის შემდეგ, შეგიძლიათ გახვიდეთ მიმდინარე „Microsoft Visual Basic აპლიკაციებისთვის“ ფანჯრიდან.
  2. მოგვიანებით თქვენ უნდა შექმნათ ახალი წესი ამ სკრიპტის გაშვებისთვის ყველა შემოსულ ელფოსტაზე.
  • პირველ რიგში, გადადით "ფაილი" მენიუში და დააჭირეთ ღილაკს "მართეთ წესები და გაფრთხილებები" ჩანართში "ინფორმაცია".
  • შემდეგ ახალ დიალოგურ ფანჯარაში დააჭირეთ ღილაკს "ახალი წესი".
  • "წესების ოსტატის" შემდეგ ეკრანზე აირჩიეთ "გამოიყენე წესი შეტყობინებებზე, რომლებიც მიღებულ იქნა" და დააჭირეთ "შემდეგი".
  • შემდეგი, უგულებელყოფთ "აირჩიეთ პირობები" და დააჭირეთ "შემდეგი".
  • შემდეგ აირჩიეთ „სკრიპტის გაშვება“ და აირჩიეთ ადრე დამატებული მაკრო, როგორც შემდეგი ეკრანის სურათი.აირჩიეთ "სკრიპტის გაშვება" მოქმედება
  • ამის შემდეგ დააწკაპუნეთ რამდენიმე „შემდეგი“ სანამ არ მიაღწევთ საბოლოო „დასრულება წესის დაყენების“ ეკრანს.
  • მოგვიანებით, თქვენ უნდა მიუთითოთ ამ წესის ახალი სახელი და ჩართოთ „ამ წესის გაშვება შეტყობინებებზე უკვე „Inbox“-ში“ და „ჩართეთ ეს წესი“.
  • დასასრულს, დააჭირეთ ღილაკს "დასრულება".დაასრულეთ წესების დაყენება
  1. ამის შემდეგ, თქვენ უნდა დაამატოთ VBA კოდით შექმნილი სვეტი „დანართების რაოდენობა“. უბრალოდ გადადგით შემდეგი ნაბიჯები:
  • პირველ რიგში, გადადით "ნახვა" ჩანართზე ელფოსტის სიის ეკრანზე.
  • შემდეგ დააჭირეთ ღილაკს "პარამეტრების ნახვა".
  • ახლად ამომხტარ დიალოგურ ფანჯარაში დააჭირეთ ღილაკს "სვეტები".
  • შემდეგ "სვეტების ჩვენება" ფანჯარაში იპოვეთ და აირჩიეთ "დანართების რაოდენობა" სვეტი "მომხმარებლის მიერ განსაზღვრული სვეტები შემოსულებში" და დააჭირეთ ღილაკს "დამატება".დაამატეთ სვეტი "დანართების რაოდენობა".
  • ბოლოს დააჭირეთ ღილაკს "OK" ცვლილებების შესანახად.
  1. საბოლოოდ, შეგიძლიათ იხილოთ სვეტი „დანართების რაოდენობა“ ელ.ფოსტის სიაში, რომელიც აჩვენებს დანართის რაოდენობას თითოეული ელფოსტისთვის, ნაჩვენებია როგორც ქვემოთ მოცემული სურათი:დანართების რაოდენობა ელ.ფოსტის სიაში

მოერიდეთ იმედგაცრუებულ PST მონაცემთა დაკარგვას

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

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

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

გააზიარე ახლა:

კომენტარები დახურულია.