Paano Mabilis na Makuha ang Kabuuang Bilang ng Mga Attachment sa Napiling Mga Email sa Outlook

Naranasan ka na bang bilangin ang bilang ng mga kalakip na email sa mga napiling email? Ito ay magiging nakakapagod kung manu-mano mong bilangin ang mga ito. Dito tutulungan ka naming gawing mas madali at mas mabilis ang pagbibilang sa Outlook VBA.

Sa ilang kadahilanan, maaaring kailanganin mong bilangin ang bilang ng mga attachment sa mga email sa Outlook. Kung gusto mo lang makuha ang bilang ng mga attachment sa isang email, magiging madali ito. Ngunit kung gusto mong bilangin ang mga attachment sa ilang email, magiging napakahirap na manu-manong bilangin. Sa pangkalahatan, ang isa sa mga pinakakaraniwang paraan ay ang pag-save ng lahat ng attachment sa isang lokal na folder sa iyong computer. Pagkatapos ay piliin ang mga ito, at sasabihin sa iyo ng Windows Explorer ang bilang ng mga napiling item sa status bar.

Gayunpaman, hindi maikakaila na ang pamamaraang ito ay medyo masalimuot pa rin. Sa totoo lang, sa pamamagitan ng Outlook VBA, mabilis mong makuha ang kabuuang bilang ng mga kalakip sa napiling mga email ng Outlook. Magbasa pa upang malaman ang detalyadong mga VBA code at hakbang.

Mabilis na Makuha ang Kabuuang Bilang ng Mga Attachment sa Napiling Mga Email

1. Sa una, ilunsad ang application ng Outlook at pumunta sa tab na "Developer".
2. Pagkatapos ay maaari kang mag-click sa pindutang "Visual Basic". Dadalhin ka nito sa window na "Microsoft Visual Basic for Applications".
3. Susunod dapat mong buksan ang isang bagong module na hindi ginagamit. Piliin ang "Ipasok"> "Modyul".
4. Pagkatapos nito, kailangan mong kopyahin at i-paste ang mga sumusunod na VBA code dito.

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. Kasunod, maaari kang lumabas sa window na "Visual Basic" at bumalik sa pangunahing window ng Outlook. Pagkatapos ay dapat mong hanapin at pindutin ang pababang arrow sa Quick Access Toolbar at piliin ang "Higit pang Mga Utos" mula sa drop down list.
6. Sundin sa paglaon ang mga hakbang na ipinakita sa imahe sa ibaba.
7. Sa wakas maaari kang magkaroon ng isang pagsubok.

• Matapos pumili ng maraming mga email, maaari mong pindutin ang bagong pindutan sa Quick Access Toolbar. Kasunod, makakakuha ka ng isang mensahe na nagsasabi sa iyo ng bilang ng mga kalakip sa mga napiling email. Mukha ang sumusunod na imahe:
• Ngunit kung pipiliin mo ang anumang mga item na tumutugon sa mga kahilingan o tugon nang pareho sa halip na mga email, makakakuha ka ng isang alerto, tulad ng larawan sa ibaba:

React sa Paminsan-minsang Mga Problema sa Outlook

Kung ginamit mo ang Outlook sa mga dekada, dapat nakaranas ka ng maraming mga problema, kabilang ang hindi pagtugon ng Outlook, pagyeyelo ng Outlook, madalas na mga mensahe ng error at Ang katiwalian sa email ng Outlook PST at iba pa. Nakapag-master ka na ba ng anumang mga trick upang matugunan ang mga ito? Sa pangkalahatan, maaari mong simulan ang Outlook sa safe mode, lumikha ng bagong profile sa Outlook, opisina ng pagkukumpuni at i-disable ang mga third-party add-in, atbp. Bukod pa rito, dapat ka ring magtago ng isang mabisang tool sa pagkukumpuni, tulad ng DataNumen Outlook Repair. Darating ito sa madaling gamiting kapag ang parehong mga pag-backup at ang tool sa pag-aayos ng inbox ay nabigo.

Panimula ng May-akda:

Si Shirley Zhang ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang ayusin ang sira na data ng SQL at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa