Outlook'ta tüm ekler e-postadan nasıl kaldırılır?

Normalde bir e-postayı önizlerken, bir eki sağ tıklayarak silebilir ve Eki Kaldır öğe. Bazen bir e-posta mesajında ​​birçok ek olabilir ve bunları tek tek kaldırmak sıkıcı olacaktır. Burada, tek bir e-postadaki tüm ekleri kaldırmak ve Outlook'ta da birden çok e-postadaki tüm ekleri kaldırmak için iki kolay numara ayarlıyoruz.

Outlook'ta tek bir e-posta iletisindeki tüm ekleri manuel olarak kaldırın
Outlook'taki birden çok e-posta iletisindeki tüm ekleri VBA kodu ile kaldırın
Kutools for Outlook ile bir veya daha fazla e-postadaki tüm ekleri kolayca kaldırın

Outlook'ta tek bir e-posta iletisindeki tüm ekleri manuel olarak kaldırın

Seçili bir e-posta iletisindeki tüm ekleri kaldırmak, Ekleri Kaldır Outlook'taki özellik.

Adım 1: Eklerini daha sonra kaldıracağınız e-posta mesajını seçin.

Adım 2: Ek Araçlarını etkinleştirmek için Okuma Bölmesindeki eklerden birine tıklayın.

Adım 3: Tümünü Seç düğmesi seçim üzerinde grup Ekler sekmesi.

Bu adım, bu seçili e-posta mesajlarındaki tüm ekleri aynı anda seçmenize olanak tanır.

Adım 4: Eki Kaldır düğmesi İşlemler üzerinde grup Ekler sekmesi.

Adım 5: Uyarı iletişim kutusunda, Ekleri Kaldır düğmesine basın.

Ardından, bu seçilen e-posta mesajlarındaki tüm ekler mümkün olan en kısa sürede silinir.

not: Ekleri Kaldır özelliği Outlook 2010 ve sonraki sürümlerde sorunsuz çalışır, ancak Outlook 2007'de çalışmaz.

Outlook'taki birden çok e-posta iletisindeki tüm ekleri VBA kodu ile kaldırın

Microsoft Outlook'ta birden çok e-posta mesajından tüm ekleri kaldırmak istiyorsanız, aşağıdaki yöntem bunu kolayca yapmanıza yardımcı olacaktır. Size tavsiye ederiz Microsoft Outlook'unuzdaki tüm makroları etkinleştirin birinci olarak.

Adım 1: klasörüne gidin Dokümanım, yeni bir klasör oluşturun ve şu şekilde adlandırın: OLAekleri

Adım 2: Eklerini daha sonra kaldıracağınız birden fazla e-posta mesajı seçin.

Not: Tuşunu basılı tutarak ardışık e-posta mesajlarını seçebilirsiniz. Ctrl tuşu ve tıklama.

Tuşunu basılı tutarak ardışık e-posta mesajlarını seçebilirsiniz. vardiya tuşu ve tıklama.

Adım 3: düğmesine basarak VBA Düzenleyiciyi açın. Ara Toplam anahtar ve F11 tuşunu aynı anda tuşlayın.

4. Adım: Project1 > Microsoft Outlook Nesneleri sol çubukta çift tıklayın ve ardından Bu OutlookOturumu Editör'de açmak için. Aşağıdaki ekran görüntüsüne bakın:

Adım 5: Aşağıdaki VBA kodunu düzenleme bölmesine kopyalayıp yapıştırın.

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

Adım 6: tuşuna basın. F5 bu VBA kodunu çalıştırmak için.

Artık seçili e-posta iletilerinin tüm ekler kaldırılır ve seçilen tüm e-posta iletilerinin altında silinen her eke köprüler bırakılır.

Kutools for Outlook ile bir veya daha fazla e-postadaki tüm ekleri kolayca kaldırın

The Tümünü Ayır ekleri faydası Outlook için Kutools Outlook'ta seçilen bir veya birden çok e-postadaki tüm ekleri hızlı bir şekilde kaldırabilir. Lütfen aşağıdaki işlemleri yapın.

Outlook için Kutools : 100'den fazla kullanışlı Outlook eklentisiyle, 60 gün içinde hiçbir sınırlama olmaksızın ücretsiz denemek.

1. Kaldırmak istediğiniz eklere sahip bir veya daha fazla e-posta mesajı seçin ve ardından Kutools > Ek Araçları > Tümünü Ayır. Ekran görüntüsüne bakın:

2. içinde Ayırma Ayarları iletişim kutusu, lütfen aşağıdaki gibi yapılandırın.

• 2.1 Araştır Silinen tüm eklerin kaydedileceği bir klasör seçmek için düğmesine basın.
• 2.2 Varsayılan olarak, Ekleri aşağıdaki stilde ayırın kutucuğu işaretlendiğinde, ihtiyaç duyduğunuz e-postalara göre ekleri farklı klasörlere kaydetmek için bir seçenek seçin.
• 2.3 OK buton. Ekran görüntüsüne bakın:

3. Tıklayın Evet düğmesi Tümünü Ayır iletişim kutusu.

4. Sonra a Outlook için Kutools Kaç ekin silindiğini bildirmek için iletişim kutusu açılacaktır. Lütfen tıklayın OK düğmesine basın. 

Artık yalnızca seçilen e-postalarda kalan köprülerle tüm ekler hemen kaldırılır. İlgili eki ihtiyaç duyduğunuzda açmak için köprüye tıklayabilirsiniz.

---

En İyi Ofis Üretkenlik Araçları

Outlook için Kutools - Outlook'unuzu Güçlendirecek 100'den Fazla Güçlü Özellik

🤖 AI Posta Yardımcısı: Yapay zeka büyüsüyle anında profesyonel e-postalar: tek tıkla dahice yanıtlar, mükemmel ton, çok dilli ustalık. E-posta göndermeyi zahmetsizce dönüştürün! ...

???? E-posta Otomasyonu: Ofis Dışında (POP ve IMAP için kullanılabilir)  /  E-posta Gönderimini Planla  /  E-posta Gönderirken Kurallara Göre Otomatik CC/BCC  /  Otomatik İletme (Gelişmiş Kurallar)   /  Otomatik Karşılama Ekleme   /  Çok Alıcılı E-postaları Otomatik Olarak Bireysel Mesajlara Bölün ...

📨 E-posta Yönetimi: E-postaları Kolayca Geri Çağırın  /  Dolandırıcılık E-postalarını Konulara ve Diğerlerine Göre Engelleyin  /  Yinelenen E-postaları Silin  /  gelişmiş Arama  /  Klasörleri Birleştir ...

📁 Ekler Pro: Toplu Kaydetme  /  Toplu Ayır  /  Toplu Sıkıştırma  /  Otomatik kaydet   /  Otomatik Ayır  /  Otomatik Sıkıştır ...

🌟 Arayüz Büyüsü: 😊Daha Fazla Güzel ve Havalı Emoji   /  Sekmeli Görünümlerle Outlook Verimliliğinizi Artırın  /  Outlook'u Kapatmak Yerine Küçültün ...

👍 Tek Tıklamayla Harikalar: Tümünü Gelen Eklerle Yanıtla  /   Kimlik Avına Karşı E-postalar  /  🕘Gönderenin Saat Dilimini Göster ...

👩🏼‍🤝‍👩🏻 Kişiler ve Takvim: Seçilen E-postalardan Toplu Kişi Ekleme  /  Kişi Grubunu Bireysel Gruplara Bölme  /  Doğum Günü Hatırlatıcılarını Kaldır ...

üzerinde 100 Özellikler Keşfinizi Bekleyin! Daha Fazlasını Keşfetmek İçin Buraya Tıklayın.

Devamını Oku       Bedava indir      Satın alma