如何快速獲取所選Outlook電子郵件中的附件總數

Outlook解決方案 2025 年 9 月 29 日
立即分享：

您是否曾經被要求計算過選定電子郵件中的電子郵件附件數量？ 如果您手動計數它們將很乏味。 在這裡，我們將幫助您使用Outlook VBA輕鬆，快速地進行計數。

由於某些原因，您可能需要計算Outlook電子郵件中的附件數量。 如果您只想在一封電子郵件中獲取附件的數量，那將非常容易。 但是，如果您希望對多封電子郵件中的附件進行計數，那麼手動進行計數將非常麻煩。 一般而言，ost 常見的方法是將所有附件保存到計算機上的本地文件夾中。 然後選擇它們，Windows資源管理器將在狀態欄中告訴您所選項目的數量。在Windows資源管理器的狀態欄中獲取編號

但是，不可否認的是，這種方法仍然很麻煩。 實際上，借助Outlook VBA，您可以快速獲取所選Outlook電子郵件中的附件總數。 繼續閱讀以了解詳細的VBA代碼和步驟。

快速獲取所選電子郵件中的附件總數

  1. 首先，啟動Outlook應用程序，然後轉到“開發人員”選項卡。
  2. 然後，您可以單擊“ Visual Basic”按鈕。 它將帶您進入“ Microsoft Visual Basic for Applications”窗口。
  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

VBA代碼-獲取所選電子郵件中的附件總數

  1. 隨後，您可以退出“ Visual Basic”窗口並返回到Outlook主窗口。 然後，您應該找到並按下快速訪問工具欄中的向下箭頭，然後從下拉列表中選擇“更多命令”。
  2. 稍後，請按照下圖所示的步驟進行操作。將VBA宏添加到快速訪問工具欄
  3. 最後，您可以嘗試一下。
  • 選擇幾封電子郵件後，您可以點擊快速訪問工具欄中的新按鈕。 隨後，您將收到一條消息，告訴您所選電子郵件中附件的數量。 如下圖所示：計數附件
  • 但是，如果您選擇滿足會議要求或響應的所有項目而不是電子郵件，則會收到警報，如下圖所示：僅選擇電子郵件

應對偶爾出現的Outlook問題

如果您使用Outlook已有數十年，那麼您肯定遇到了多種麻煩，包括Outlook無法響應，Outlook凍結，常見錯誤消息和 Outlook PST電子郵件損壞 等等。 您是否已經掌握了解決這些問題的任何技巧？ 一般來說，您可以tart在安全模式下運行Outlook，創建新的Outlook配置文件，維修辦公室並禁用第三方加載項等。此外，還應在附近放置一個有效的維修工具，例如 DataNumen Outlook Repair。 當備份和收件箱修復工具均失敗時，它將非常有用。

作者簡介：

Shirley Zhang是的數據恢復專家 DataNumen，Inc.是數據恢復技術的全球領導者，包括 修復損壞的SQL數據 和Outlook修復軟件產品。 欲了解更多信息，請訪問 萬維網。datanumen.COM

立即分享：

評論被關閉。