Outlook'ta bir e-postadan tüm ekleri nasıl kaldırılır?
Normalde bir e-postayı önizlerken, sağ tıklayıp Ekleri Kaldır seçeneğini belirleyerek bir ek silebilirsiniz. Bazen bir e-posta mesajında birçok ek olabilir ve bunları tek tek kaldırmak can sıkıcı olabilir. İşte size Outlook'ta bir e-postadaki tüm ekleri kaldırmak için iki kolay yöntem sunuyoruz; ayrıca birden fazla e-postadan da tüm ekleri kaldırabilirsiniz.
Outlook'ta tek bir e-posta mesajından tüm ekleri manuel olarak kaldırma
Outlook'ta VBA kodu ile birden fazla e-posta mesajından tüm ekleri kaldırma
Kutools for Outlook ile bir veya birden fazla e-postadan tüm ekleri kolayca kaldırma
Outlook'ta tek bir e-posta mesajından tüm ekleri manuel olarak kaldırma
Outlook'un Ekleri Kaldır özelliği ile seçili e-posta mesajlarındaki tüm ekleri kaldırmak kolaydır.
Adım 1: Daha sonra eklerini kaldıracak olduğunuz e-posta mesajını seçin.
Adım 2: Okuma Bölmesi'ndeki bir ek üzerine tıklayarak Ek Araçlarını etkinleştirin.
Adım 3: Ekler sekmesindeki Seçim grubunda Tümünü Seç düğmesine tıklayın.
Bu adım, seçili e-posta mesajındaki tüm ekleri aynı anda seçmenizi sağlar.
Adım 4: Ekler sekmesindeki İşlemler grubunda Ekleri Kaldır düğmesine tıklayın.
Adım 5: Uyarı iletişim kutusunda, Ekleri Kaldır düğmesine tıklayın.
Daha sonra, bu seçili e-posta mesajındaki tüm ekler mümkün olan en kısa sürede silinir.
Not: Ekleri Kaldır özelliği, Outlook 2010 ve daha yeni sürümlerde iyi çalışır, ancak Outlook 2007'de çalışmaz.
Outlook'ta birden fazla seçili e-postadan tüm ekleri kolayca kaldırma:
Kutools for Excel'in Tüm Ekleri Ayır özelliği sayesinde, aşağıdaki gösteride olduğu gibi birden fazla seçili e-postadan tüm ekleri kolayca kaldırabilirsiniz. (Ekler belirli bir klasöre kaydedilecektir) Şimdi indirin ve deneyin! (30-gün ücretsiz deneme)
Outlook'ta VBA kodu ile birden fazla e-posta mesajından tüm ekleri kaldırma
Microsoft Outlook'taki birden fazla e-posta mesajından tüm ekleri kaldırmak istiyorsanız, aşağıdaki yöntem size bunu kolayca yapmanıza yardımcı olacaktır. Öncelikle Microsoft Outlook'taki tüm makroları etkinleştirmenizi öneririz.
Adım 1: Belgelerim klasörüne gidin, yeni bir klasör oluşturun ve adını OLAttachments olarak değiştirin.
Adım 2: Daha sonra eklerini kaldıracak olduğunuz birden fazla e-posta mesajını seçin.
Not: Ctrl tuşunu basılı tutarak ve tıklayarak ardışık olmayan e-posta mesajlarını seçebilirsiniz.
Shift tuşunu basılı tutarak ve tıklayarak ardışık e-posta mesajlarını seçebilirsiniz.
Adım 3: Alt tuşuna ve F11 tuşuna aynı anda basarak VBA Düzenleyici'yi açın.
Adım 4: Sol çubuktaki Project1 > Microsoft Outlook Nesneleri'ni genişletin ve ardından ThisOutlookSession öğesine çift tıklayarak Düzenleyici'de açın. 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 SubAdım 6: Bu VBA kodunu çalıştırmak için F5 tuşuna basın.
Şimdi, seçilen e-posta mesajlarındaki tüm ekler kaldırıldı ve her silinen ek için tüm seçilen e-posta mesajlarının alt kısmında köprüler bırakıldı.
Kutools for Outlook ile bir veya birden fazla e-postadan tüm ekleri kolayca kaldırma
Kutools for Outlook'un Tüm Ekleri Ayır özelliği, Outlook'ta bir veya birden fazla seçili e-postadan tüm ekleri hızlıca kaldırabilir. Lütfen aşağıdaki adımları izleyin.
Kutools for Outlook : 100'den fazla kullanışlı Outlook eklentisiyle, 30 gün boyunca sınırsız deneme imkanı.
1. Kaldırmak istediğiniz eklerle bir veya birden fazla e-posta mesajını seçin, ardından Kutools > Ek Araçları > Tümünü Ayır'a tıklayın. Ekran görüntüsüne bakın:
2. Ayırma Ayarları iletişim kutusunda lütfen aşağıdaki şekilde yapılandırın.
- 2.1 Silinen tüm ekleri kaydetmek için bir klasör seçmek üzere Gözat düğmesine tıklayın.
- 2.2 Varsayılan olarak, Aşağıdaki stilde ekleri ayır kutusu işaretlidir, lütfen ihtiyaçlarınıza göre ekleri farklı klasörlere kaydetmek için bir seçenek seçin.
- 2.3 Tamam düğmesine tıklayın. Ekran görüntüsüne bakın:
3. Tüm Ekleri Ayır iletişim kutusunda Evet düğmesine tıklayın.
4. Ardından, size kaç tane ek silindiğini bildiren bir Kutools for Outlook iletişim kutusu açılacaktır. Tamam düğmesine tıklayın.
Şimdi, seçili e-postalarda yalnızca köprüler kalacak şekilde tüm ekler hemen kaldırılır. İhtiyaç duyduğunuzda eklemek için köprüye tıklayabilirsiniz.
Bu yardımcı programın ücretsiz deneme sürümünü (30 gün) kullanmak istiyorsanız, lütfen indirmek için tıklayın ve ardından yukarıdaki adımlara göre işlemi uygulamak için gidin.
En İyi Ofis Verimlilik Araçları
Son Dakika: Kutools for Outlook Ücretsiz Sürümünü Sunmaya Başladı!
Yepyeni Kutools for Outlook ile100'den fazla etkileyici özelliği deneyimleyin! Şimdi indir!
📧 E-posta Otomasyonu: Otomatik Yanıt (POP ve IMAP için kullanılabilir) / E-posta Gönderimini Zamanla / E-posta Gönderirken Kurala Göre Otomatik CC/BCC / Gelişmiş Kurallar ile Otomatik Yönlendirme / Selamlama Ekle / Çoklu Alıcılı E-postaları Otomatik Olarak Bireysel Mesajlara Böl...
📨 E-posta Yönetimi: E-postayı Geri Çağır / Konu veya diğer kriterlere göre dolandırıcılık amaçlı e-postaları engelle / Yinelenen e-postaları sil / Gelişmiş Arama / Klasörleri Düzenle...
📁 Ekler Pro: Toplu Kaydet / Toplu Ayır / Toplu Sıkıştır / Otomatik Kaydet / Otomatik Ayır / Otomatik Sıkıştır...
🌟 Arayüz Büyüsü: 😊 Daha Fazla Şık ve Eğlenceli Emoji / Önemli e-postalar geldiğinde uyarı / Outlook'u kapatmak yerine küçült...
👍 Tek Tıkla Harikalar: Tümüne Eklerle Yanıtla / Kimlik Avı E-postalarına Karşı Koruma / 🕘 Gönderenin Saat Dilimini Göster...
👩🏼🤝👩🏻 Kişiler & Takvim: Seçilen E-postalardan Toplu Kişi Ekle / Bir Kişi Grubunu Bireysel Gruplara Böl / Doğum günü hatırlatıcısını kaldır...
Kutools'u tercih ettiğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve40'tan fazla başka dili destekler!
🚀 Tek Tıkla İndir — Tüm Ofis Eklentilerini Edinin
Şiddetle Tavsiye Edilen: Kutools for Office (5'i1 arada)
Tek tıkla beş kurulum paketini birden indirin — Kutools for Excel, Outlook, Word, PowerPoint ve Office Tab Pro. Şimdi indir!
- ✅ Tek tık kolaylığı: Beş kurulum paketinin hepsini tek seferde indirin.
- 🚀 Her türlü Ofis görevi için hazır: İhtiyacınız olan eklentileri istediğiniz zaman yükleyin.
- 🧰 Dahil olanlar: Kutools for Excel / Kutools for Outlook / Kutools for Word / Office Tab Pro / Kutools for PowerPoint