כיצד להסיר את כל הקבצים המצורפים מהדואר האלקטרוני ב-Outlook?

Author: Kelly Last Modified: 2025-05-30

באופן רגיל, כאשר אתה מביט בתצוגה מקדימה של דואר אלקטרוני, תוכל למחוק קובץ מצורף על ידי לחיצה ימנית ובחירת הפריט הסר קובץ מצורף. לפעמים עשויים להיות הרבה קבצים מצורפים בהודעה אחת, והסרתם אחד אחרי השני יכולה להיות מייגעת. כאן אנו מספקים לך שתי טיפים קלים כדי להסיר את כל הקבצים המצורפים בהודעה אחת, וגם להסיר את כל הקבצים המצורפים מרבות הודעות דואר אלקטרוני ב-Outlook.

הסרת כל הקבצים המצורפים באופן ידני בהודעת דואר אלקטרוני אחת ב-Outlook
הסרת כל הקבצים המצורפים מרבות הודעות דואר אלקטרוני ב-Outlook עם קוד VBA
הסר בקלות את כל הקבצים המצורפים מהודעה או מרבות הודעות עם Kutools עבור Outlook

הסרת כל הקבצים המצורפים באופן ידני בהודעת דואר אלקטרוני אחת ב-Outlook

קל להסיר את כל הקבצים המצורפים בהודעות הדואר האלקטרוני שנבחרו עם תכונת הסרת הקבצים המצורפים ב-Outlook.

שלב 1: בחר את הודעת הדואר האלקטרוני שקבצים המצורפים שלה תסיר מאוחר יותר.

שלב 2: לחץ על אחד מהקבצים המצורפים בחלונית הקריאה כדי להפעיל את כלי הקבצים המצורפים.

doc-save-attachments-1

שלב 3: לחץ על כפתור בחר הכל בקבוצה טווח בכרטיסיית הקבצים המצורפים.

doc-save-attachments-2

צעד זה יאפשר לך לבחור את כל הקבצים המצורפים בהודעות הדואר האלקטרוני שנבחרו בבת אחת.

שלב 4: לחץ על כפתור הסר קובץ מצורף בקבוצה פעולות בכרטיסיית הקבצים המצורפים.

שלב 5: בתיבת הדו-שיח אזהרה, לחץ על כפתור הסר קבצים מצורפים.

doc-save-attachments-3

לאחר מכן, כל הקבצים המצורפים בהודעות הדואר האלקטרוני שנבחרו יוסרו בהקדם האפשרי.

הערה: תכונת הסרת הקבצים המצורפים עובדת היטב ב-Outlook 2010 ובגרסאות מאוחרות יותר, אך לא ב-Outlook 2007.

עם כלי נתק את כל הקבצים המצורפים של Kutools עבור Excel, תוכל להסיר בקלות את כל הקבצים המצורפים מרבות הודעות שנבחרו כפי שמוצג בהדגמה להלן. (הקבצים המצורפים ישמרו לתיקייה מסוימת) הורד ונסה עכשיו! (30-יום נסיון חינם)

הסרת כל הקבצים המצורפים מרבות הודעות דואר אלקטרוני ב-Outlook עם קוד VBA

אם ברצונך להסיר את כל הקבצים המצורפים מרבות הודעות דואר אלקטרוני ב-Microsoft Outlook, השיטה הבאה תעזור לך לעשות זאת בקלות. אנו ממליצים להפעיל את כל המאקרוים שלך ב-Microsoft Outlook תחילה.

שלב 1: עבור לתיקיית My Document, צור תיקייה חדשה, ותן לה את השם OLAttachments

שלב 2: בחר מספר הודעות דואר אלקטרוני שקבצים המצורפים שלהם תסיר מאוחר יותר.

הערה: באפשרותך לבחור הודעות דואר אלקטרוני שאינן עוקבות תוך החזקת מקש Ctrl וללחוץ.

ניתן לבחור הודעות דואר אלקטרוני עוקבות תוך החזקת מקש Shift וללחוץ.

שלב 3: פתח את עורך ה-VBA על ידי לחיצה בו זמנית על מקשי Alt ו-F11.

שלב 4: הרחב את Project1 > Microsoft Outlook Objects בסרגל השמאלי, ולאחר מכן לחץ פעמיים על ThisOutlookSession כדי לפתוח אותו בעורך. ראה צילום המסך הבא:

doc-delete-attachments-4

שלב 5: העתק והדבק את הקוד VBA הבא לחלונית העריכה.

Public Sub ReplaceAttachmentsToLink()
Dim objApp As Outlook.Application
Dim aMail As Outlook.MailItem 'Object
Dim oAttachments As Outlook.Attachments
Dim oSelection As Outlook.Selection
Dim i As Long
Dim iCount As Long
Dim sFile As String
Dim sFolderPath As String
Dim sDeletedFiles As String
 
    ' Get the path to your My Documents folder
    sFolderPath = CreateObject("WScript.Shell").SpecialFolders(16)
    On Error Resume Next
 
    ' Instantiate an Outlook Application object.
    Set objApp = CreateObject("Outlook.Application")
 
    ' Get the collection of selected objects.
    Set oSelection = objApp.ActiveExplorer.Selection
 
    ' Set the Attachment folder.
    sFolderPath = sFolderPath & "\OLAttachments"
 
    
    ' Check each selected item for attachments. If attachments exist,
    ' save them to the Temp folder and strip them from the item.
    For Each aMail In oSelection
 
    ' This code only strips attachments from mail items.
    ' If aMail.class=olMail Then
    ' Get the Attachments collection of the item.
    Set oAttachments = aMail.Attachments
    iCount = oAttachments.Count
     
       
    If iCount > 0 Then
     
        ' We need to use a count down loop for removing items
        ' from a collection. Otherwise, the loop counter gets
        ' confused and only every other item is removed.
         
        For i = iCount To 1 Step -1
         
            ' Save attachment before deleting from item.
            ' Get the file name.
            sFile = oAttachments.Item(i).FileName
             
            ' Combine with the path to the Temp folder.
            sFile = sFolderPath & "\" & sFile
             
            ' Save the attachment as a file.
            oAttachments.Item(i).SaveAsFile sFile
             
            ' Delete the attachment.
            oAttachments.Item(i).Delete
             
            'write the save as path to a string to add to the message
            'check for html and use html tags in link
            If aMail.BodyFormat <> olFormatHTML Then
                sDeletedFiles = sDeletedFiles & vbCrLf & "<file://" & sFile & ">"
            Else
                sDeletedFiles = sDeletedFiles & "<br>" & "<a href='file://" & _
                sFile & "'>" & sFile & "</a>"
            End If
             
                         
        Next i
        'End If
             
       ' Adds the filename string to the message body and save it
       ' Check for HTML body
       If aMail.BodyFormat <> olFormatHTML Then
           aMail.Body = aMail.Body & vbCrLf & _
           "The file(s) were saved to " & sDeletedFiles
       Else
           aMail.HTMLBody = aMail.HTMLBody & "<p>" & _
           "The file(s) were saved to " & sDeletedFiles & "</p>"
       End If
       
       aMail.Save
       'sets the attachment path to nothing before it moves on to the next message.
       sDeletedFiles = ""
    
       End If
    Next 'end aMail
     
ExitSub:
 
Set oAttachments = Nothing
Set aMail = Nothing
Set oSelection = Nothing
Set objApp = Nothing
End Sub

שלב 6: לחץ על מקש F5 כדי להריץ את קוד ה-VBA.

כעת כל הקבצים המצורפים מההודעות שנבחרו יורדו, תוך השארת קישורים לכל קובץ מחובר שהוסר בתחתית כל ההודעות שנבחרו.

doc-delete-attachments-7

הסר בקלות את כל הקבצים המצורפים מהודעה או מרבות הודעות עם Kutools עבור Outlook

כלי נתק את כל הקבצים המצורפים של Kutools עבור Outlook יכול במהירות להסיר את כל הקבצים המצורפים מהודעה או מרבות הודעות שנבחרו ב-Outlook. אנא עשה כך:

Kutools עבור Outlook : עם יותר מ-100 תוספים שימושיים עבור Outlook, ניתן לנסות ללא הגבלה במשך 30 ימים.

1. בחר הודעה או מספר הודעות דואר אלקטרוני עם הקבצים המצורפים שברצונך להסיר, ולאחר מכן לחץ על Kutools > כלי קבצים מצורפים > נתק את כל. ראה צילום מסך:

doc-save-attachments-multiple-emails6

2. בתיבת הדו-שיח הגדרות פרידה, אנא תקן כך:

2.1 לחץ על כפתור עיין כדי לבחור תיקייה לשמירת כל הקבצים המצורפים שנמחקו.
2.2 כברירת מחדל, תיבת הסגנון להסרת הקבצים המצורפים מסומנת, אנא בחר אפשרות לשמור את הקבצים לתוך תיקיות שונות בהתבסס על הודעות הדואר האלקטרוני לפי הצורך.
2.3 לחץ על כפתור אישור. ראה צילום מסך:

doc-save-attachments-multiple-emails7

הערות:

1. אם ברצונך לשמור את כל הקבצים המצורפים באותה תיקייה, אנא בטל את הסימון על יצירת תת-תיקיות בסגנון הבא.

2. לאחר הסרת הקבצים המצורפים, סמל הקובץ המצורף יעלם מההודעות של רשימת הדיוור. באפשרותך לבדוק את התיבה 'שמור צלמית קובץ מצורף לאחר פרידת הדואר האלקטרוני' כדי תמיד להשאיר אותו.

2. בנוסף להסרת כל הקבצים המצורפים מההודעות שנבחרו, באפשרותך להסיר קבצים מצורפים על פי תנאים מסוימים בלבד. למשל, אם ברצונך להסיר רק את הקבצים המצורפים שגודלם עולה על 500KB, לחץ על כפתור אפשרויות מתקדמות כדי להרחיב את התנאים, ולאחר מכן תקן בהתאם לצילום המסך להלן.

doc-save-attachments-multiple-emails08