כיצד לשמור קבצים מצורפים מבלי לפתוח את הדוא"ל ב-Outlook?
ייתכן שתצטרכו לעיתים קרובות לשמור קבצים מצורפים מהודעות דוא"ל שהתקבלו לדיסקים של המחשב שלכם. קל לשמור קובץ מצורף או את כל הקבצים המצורפים מהודעת דוא"ל אחת, אך כיצד ניתן לשמור קבצים מצורפים מרבות הודעות בו-זמנית? בדרך כלל, תצטרכו לפתוח שוב ושוב את ההודעות ולשמור את הקבצים המצורפים. האם יש טריקים כדי להיפטר מהפעולות החוזרות? השיטות שבטיפ זה יכולות לעזור לכם.
שמירת קבצים מצורפים מודעה אחת או יותר מבלי לפתוח עם קוד VBA
שמירת קבצים מצורפים מודעה אחת או יותר מבלי לפתוח עם כלי מדהים
שמירת קבצים מצורפים מודעה אחת או יותר מבלי לפתוח עם קוד VBA
הקוד VBA הבא יכול לעזור לשמור קבצים מצורפים מודעה אחת או יותר בו-זמנית מבלי לפתוח את הודעות הדוא"ל ב-Outlook. אנא עשו כמפורט להלן.
1. בחרו הודעה או מספר הודעות בהן תרצו לשמור את הקבצים המצורפים, לחצו על המקשים Alt + F11 כדי לפתוח את חלון Microsoft Visual Basic for Applications.
2. הרחיבו את תיקיית אובייקטי Microsoft Outlook, הקליקו פעמיים על ThisOutlookSession כדי לפתוח את חלון הקוד, ולאחר מכן העתיקו את הקוד VBA הבא לתוכו.

קוד VBA: שמירת קבצים מצורפים מבלי לפתוח את הודעות הדוא"ל
Public Sub SaveAttachmentsWithoutOpening()
'Updated by Extendoffice 20191008
Dim xMailItem As Outlook.MailItem
Dim xAttachments As Outlook.Attachments
Dim xAttachment As Outlook.Attachment
Dim i As Long
Dim xCount As Long
Dim xFileName As String
Dim xSavePath As String
Dim xOriginalFiles As String
On Error Resume Next
Set xShell = CreateObject("Shell.Application")
Set xFolder = xShell.BrowseForFolder(0, "Select a folder:", 0, strStartingFolder)
If Not TypeName(xFolder) = "Nothing" Then
Set xFolderItem = xFolder.self
xSavePath = xFolderItem.Path & "\"
Else
xFileName = ""
Exit Sub
End If
For Each xMailItem In Outlook.ActiveExplorer.Selection
Set xAttachments = xMailItem.Attachments
xCount = xAttachments.Count
xOriginalFiles = ""
If xCount > 0 Then
For i = xCount To 1 Step -1
Set xAttachment = xAttachments.Item(i)
If IsEmbeddedAttachment(xAttachment) = False Then
xFileName = xSavePath & xAttachment.FileName
xAttachment.SaveAsFile xFileName
xAttachment.Delete
If xMailItem.BodyFormat <> olFormatHTML Then
xOriginalFiles = xOriginalFiles & vbCrLf & "file://" & xFileName
Else
xOriginalFiles = xOriginalFiles & "<br>" & "<a href='file://" & xFileName & "'>" & xFileName & "</a>"
End If
End If
Next i
If xMailItem.BodyFormat <> olFormatHTML Then
xMailItem.Body = "The file(s) were saved to " & xOriginalFiles & vbCrLf & vbCrLf & xMailItem.Body
Else
xMailItem.HTMLBody = "<p>" & "The file(s) were saved to " & xOriginalFiles & "</p>" & xMailItem.HTMLBody
End If
xMailItem.Save
End If
Next
Set xAttachments = Nothing
Set xMailItem = Nothing
End Sub
Function IsEmbeddedAttachment(Attach As Attachment)
Dim xItem As MailItem
Dim xCid As String
Dim xID As String
Dim xHtml As String
On Error Resume Next
IsEmbeddedAttachment = False
Set xItem = Attach.Parent
If xItem.BodyFormat <> olFormatHTML Then Exit Function
xCid = ""
xCid = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
If xCid <> "" Then
xHtml = xItem.HTMLBody
xID = "cid:" & xCid
If InStr(xHtml, xID) > 0 Then
IsEmbeddedAttachment = True
End If
End If
End Function
4. לחצו על מקש F5 כדי להריץ את הקוד. לאחר מכן יופיע חלון BrowseForFolder, אנא בחרו תיקייה לשמירת הקבצים המצורפים, ולאחר מכן לחצו על הכפתור אישור.
לאחר מכן כל הקבצים המצורפים בהודעות שנבחרו יישמרו לתיקייה שנבחרה מיידית.
הערה: כל הקבצים המצורפים ינתקו מההודעות וישארו עם קישורים נתיבי שמירה מתאימים בגוף ההודעה.

שמירת קבצים מצורפים מודעה אחת או יותר מבלי לפתוח עם כלי מדהים
אם אתם חדשים בשימוש ב-VBA, השיטה בחלק זה תהיה הבחירה הטובה עבורכם.
כאן אנו ממליצים על שמירת כל הקבצים המצורפים כלים נוספים של Kutools עבור Outlook עבורכם. אם ברצונכם רק לשמור את הקבצים המצורפים מבלי לנתק אותם מההודעות שנבחרו, תכונת שמירת כל הקבצים המצורפים יכולה לעזור לכם לעשות זאת בקלות. אנא עשו כמפורט להלן.
לפני השימוש ב-Kutools עבור Outlook, אנא הורידו והתקינו אותו תחילה.
פתחו את היעילות המירבית של הדואר האלקטרוני עם Kutools עבור Outlook! גשו ל-70 תכונות חזקות לגמרי בחינם, לנצח. הורידו את הגרסה المجانية עכשיו!
1. בחרו את ההודעות המכילות את הקבצים המצורפים שתרצו לשמור, לחצו על Kutools Plus > כלי קבצים מצורפים > שמור הכל.
2. בחלון הגדרות השמירה, עליכם לבצע את הפעולות הבאות:
- 2.1) בתוך הסעיף שמור קבצים מצורפים לתיקייה זו, בחרו תיקייה לשמירת הקבצים המצורפים;
- 2.2) תיבת סגנון השמירה למטה היא אופציונלית עבורכם ליצור תת-תיקייה בסגנון מסוים לשמירת הקבצים המצורפים, או לשנות את שמות הקבצים המצורפים עם סגנון מסוים.
- 2.3) לחצו על אישור כדי להתחיל לשמור את כל הקבצים המצורפים מההודעות שנבחרו.
טיפים: עם התצורה לעיל, כל הקבצים המצורפים יישמרו לתיקייה שצוינה. אם ברצונכם לשמור רק קבצים מסוימים, כגון רק קבצי PDF עם המילה "חשבונית" בשם הקובץ, תוכלו להגדיר את תנאי הסינון כדלקמן.
- לחצו על כפתור אפשרויות מתקדמות כדי להרחיב את תנאי הסינון;
- הגדרו את התנאים בהתאם לצרכים שלכם.
טיפים: כאן אני מסמן את שם קובץ מצורף תיבת מכילה ואז מקלידים "חשבונית" לתוך תיבת הטקסט, לאחר מכן מסמנים את סוג הקובץ המצורף הוא תיבת סוג הקובץ, מקלידים ".pdf" לתוך תיבת הטקסט.

3. בחלון הדו-שיח הבא שיופיע, לחצו על כן כדי להמשיך.
לאחר מכן הקבצים המצורפים בהודעות שנבחרו יישמרו לתיקייה שצוינה מיידית.
טיפים: כדי לנתק קבצים מצורפים מההודעות שנבחרו ולהשאיר רק את הקישורים ההיפרטקסטים של הקבצים המצורפים בגוף ההודעה, תכונת הפרדת כל הקבצים המצורפים יכולה לעזור.
מאמרים קשורים
הורדת/שמירת קבצים מצורפים באופן אוטומטי מ-Outlook לתיקייה מסוימת
באופן כללי, תוכלו לשמור את כל הקבצים המצורפים של דואר אלקטרוני אחד עם לחיצה על קבצים מצורפים > שמור את כל הקבצים המצורפים ב-Outlook. אבל, אם תצטרכו לשמור את כל הקבצים המצורפים מכל הודעות הדואר שהתקבלו והמסופקות, יש רעיון? מאמר זה יציג שתי דרכים להורדת קבצים מצורפים באופן אוטומטי מ-Outlook לתיקייה מסוימת.
שמירת קבצים מצורפים בעת תגובה ב-Outlook
כאשר אנו מעבירים הודעת דוא"ל ב-Microsoft Outlook, הקבצים המצורפים המקוריים בהודעה זו נשמרים בהודעה המועברת. לעומת זאת, כאשר אנו מגיבים להודעת דוא"ל, הקבצים המצורפים המקוריים לא יוצמדו להודעה החדשה. כאן אנו הולכים להציג כמה טריקים לשמירת הקבצים המצורפים המקוריים בעת תגובה ב-Microsoft Outlook.
חיפוש מילים בתוך קובץ מצורף (תוכן) ב-Outlook
כאשר אנו מקלידים מילת מפתח בתיבת החיפוש המיידי ב-Outlook, הוא יחפש את המפתח בנושאי הודעות הדוא"ל, בגופים, בקבצים מצורפים וכו'. אבל עכשיו אני צריך לחפש את המפתח רק בתוכן הקובץ המצורף ב-Outlook, יש רעיון? מאמר זה מציג את השלבים המפורטים לחיפוש מילים בתוך תוכן קובץ מצורף ב-Outlook בקלות.
כלי הפרודוקטיביות הטובים ביותר ל-Office
חדשות חמות: Kutools עבור Outlook משיק גרסה חינמית!
התנסו בגרסה החינמית החדשה של Kutools עבור Outlook עם יותר מ-70 תכונות מדהימות, לשימושכם לתמיד! לחצו להורדה עכשיו!
🤖 Kutools AI : עושה שימוש בטכנולוגיית AI מתקדמת לניהול דואר אלקטרוני בקלות, כולל השבה, סיכום, אופטימיזציה, הרחבה, תרגום וכתיבת הודעות.
📧 אוטומציה של כתובת דואר אלקטרוני: תגובה אוטומטית (זמין עבור POP ו-IMAP) / תזמון שליחת כתובת דואר אלקטרוני / העתקה אוטומטית/עותק מוסתר לפי כלל בעת שליחת משלח אימייל / העברה אוטומטית (כלל מתקדם) / הוספת ברכה אוטומטית / פיצול אוטומטי של דואר אלקטרוני עם מספר נמענים להודעות נפרדות...
📨 ניהול כתובת דואר אלקטרוני: שלח מייל מחדש / חסום דואר אלקטרוני מזויף לפי נושא ואחרים / מחיקת דואר כפול / חיפוש מתקדם / ארגון תיקיות...
📁 קבצים מצורפים Pro: שמירה אצווה / פרידה אצווה / דחיסה אצווה / שמירה אוטומטית / נתק אוטומטית / דחיסה אוטומטית...
🌟 קסם הממשק: 😊עוד אימוגי יפים ומגניבים / קבלת תזכורת כאשר מגיע דואר אלקטרוני חשוב / מזעור Outlook במקום סגירה...
👍 פעולות בלחיצה אחת: השב לכולם עם קבצים מצורפים / דואר אלקטרוני נגד פישינג / 🕘הצגת אזור הזמן של השולח...
👩🏼🤝👩🏻 אנשי קשר ויומן: הוספת אנשי קשר מאצווה מתוך כתובת דואר אלקטרוני נבחרת / פיצול קבוצת אנשי קשר לקבוצות נפרדות / הסר תזכורת יומולדת...
פתחו מיד את Kutools עבור Outlook בלחיצה אחת. אל תחכו – הורידו עכשיו והגבירו את היעילות שלכם!

