Outlook’ta e-posta konusunu ek dosya adıyla otomatik olarak nasıl doldurabilirsiniz?
Outlook’ta e-posta konusuna her seferinde ek adını elle yazmak, özellikle ek adını konu olarak kullanmaya alışkın olanlar için oldukça zaman alıcı olabilir. Aşağıdaki GIF’te gösterildiği gibi, bir ek eklediğinizde e-posta konusunu otomatik olarak bu ek adıyla doldurmak istiyorsanız, bu öğreticideki VBA yöntemi tam size göre!
VBA koduyla E-posta Konusu'yi Ek Adı ile otomatik olarak doldurun
Lütfen Outlook’ta e-posta konusunu “Ek Ekle” olarak otomatik doldurmak için aşağıdaki VBA kodunu çalıştırın.
1. Outlook'u başlatın ve Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.
2. Microsoft Visual Basic for Applications penceresinde, Project1 (VbProject.OTM) > Microsoft Outlook Nesneleri > ThisOutlookSession öğesine çift tıklayarak ThisOutlookSession (Kod) düzenleyicisini açın.
3. Ardından aşağıdaki VBA kodunu ThisOutlookSession (Kod) düzenleyicisine kopyalayın.
VBA kodu: E-posta Konusu'yi Ek Adı ile otomatik olarak doldur
Public WithEvents GExplorer As Explorer
'Updated by Extendoffice 20220926
Public WithEvents GInspectors As Inspectors
Public WithEvents GMail As MailItem
Private Sub Application_Startup()
Set GExplorer = Application.ActiveExplorer
Set GInspectors = Application.Inspectors
End Sub
Private Sub GExplorer_InlineResponse(ByVal Item As Object)
Set GMail = Item
End Sub
Private Sub GInspectors_NewInspector(ByVal Inspector As Inspector)
Dim xItem As Object
Set xItem = Inspector.CurrentItem
If xItem.Class <> olMail Then Exit Sub
Set GMail = xItem
End Sub
Private Sub GMail_AttachmentAdd(ByVal Att As Attachment)
Dim xFileName As String
On Error Resume Next
If VBA.Trim(GMail.Subject) <> "" Then Exit Sub
If MsgBox("Do you want to use the attachment name as the subject?", vbYesNo + vbInformation, "Kutools for Outlook") = vbNo Then Exit Sub
xFileName = Att.DisplayName
xFileName = Left$(xFileName, VBA.InStrRev(xFileName, ".") - 1)
GMail.Subject = xFileName
End Sub 
4. Artık kodu kaydedip Outlook'u yeniden başlatmanız gerekiyor.
5. Bundan sonra, henüz konusu doldurulmamış bir e-postaya ek eklediğinizde, Kutools for Outlook, ek adını konu olarak kullanmak isteyip istemediğinizi soran bir iletişim kutusu açacaktır; Evet düğmesine tıklayın.

Böylece konu satırı otomatik olarak "Ek Ekle" adıyla doldurulur.

Notlar:
Outlook’ta Yapay Zeka Posta Asistanı: Daha Akıllı Yanıtlar, Net İletişim (tek tıkla sihir!)
Kutools for Outlook’un Yapay Zeka Posta Asistanı ile günlük Outlook görevlerinizi hızlandırın! Bu güçlü araç, geçmiş e-postalarınızdan öğrenerek akıllı ve doğru yanıtlar sunar, e-posta içeriğinizi optimize eder ve mesajlarınızı zahmetsizce taslak haline getirip iyileşmenize yardımcı olur.

Bu özellik şunları destekler:
- Akıllı Yanıtlar: Geçmiş sohbetlerinize dayanarak özelleştirilmiş, net ve hemen kullanıma hazır yanıtlar alın.
- Geliştirilmiş İçerik: E-posta metninizi netlik ve etki açısından otomatik olarak güçlendirin.
- Zahmetsiz Yazım: Anahtar kelimeleri girin, gerisini çoklu Yazı Stili ile yapay zeka halletsin.
- Akıllı Uzantılar: Bağlama duyarlı önerilerle fikirlerinizi daha da geliştirin.
- Özetleme: Uzun e-postaların kısa ve öz özetlerini anında alın.
- Küresel Erişim: E-postalarınızı herhangi bir dile kolayca çevirin.
Bu özellik şunları destekler:
- Akıllı e-posta yanıtları
- İyileştirilmiş içerik
- Anahtar kelimeye dayalı taslaklar
- Akıllı içerik uzantısı
- E-posta özetleme
- Çok dilli çeviri
Beklemeyin—Yapay Zeka Posta Asistanı’nı şimdi indirin ve keyfini çıkarın!
En İyi Office Verimlilik Araçları
Yepyeni Kutools for Outlook’i 100+ inanılmaz özelliğiyle deneyimleyin!Şimdi indirmek için tıklayın!
📧E-posta Otomasyonu: Otomatik Yanıt (POP ve IMAP için kullanılabilir) / E-postaları Zamanlayarak Gönderme / E-posta Gönderirken Kurallara Göre Otomatik CC/BCC / Otomatik Yönlendirme (Gelişmiş Kurallar) / Otomatik Selam Eklemesi / Çok Alıcılı E-postaları Otomatik Olarak Bireysel Mesajlara Bölme…
📨E-posta Yönetimi: E-postayı Geri Çağırma, Konu Başlıklarına ve Diğerlerine Göre Dolandırıcılık E-postalarını Engelleme, Yinelenen E-postaları Silme, Gelişmiş Arama, Klasörleri Düzenleme…
📁Ek Dosyalar Pro: Toplu Kaydet, Toplu Ayır, Toplu Sıkıştır, Otomatik Kaydet, Otomatik Ayır ve Otomatik Sıkıştır…
🌟Arayüz Büyüsü: 😊 Daha Güzel ve Havalı Emojiler / Önemli e-postalar geldiğinde sizi uyarır / Outlook’u Kapatmak Yerine Küçültür…
👍Tek Tıkla Harikalar: Tümüne Eklerle Yanıtla / Phishing’e Karşı E-postalar / 🕘Gönderenin Mevcut Saati: Saat Dilimini Göster…
👩🏼🤝👩🏻Kişiler ve Takvim:Seçili E-postalardan Toplu Kişi Ekleme/Bir Kişi Grubunu Bireysel Gruplara Bölme/Doğum Günü Hatırlatıcısını Kaldırma…
Kutools’u tercih ettiğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve 40’tan fazla başka dil desteğiyle!


🚀 Tek Tıkla İndir — Tüm Office Eklentilerini Edinin
Kesinlikle Önerilir: Kutools for Office (5’li Paket)
Beş yükleyiciyi tek tıkla indirin beş yükleyiciyiaynı anda —Kutools for Excel, Outlook, Word, PowerPointve Office Tab Pro.Şimdi indirmek için tıklayın!
- ✅Tek tıkla kullanım kolaylığı: Beş kurulum paketini tek seferde indirin.
- 🚀Her Office görevine hazır: İhtiyacınız olduğunda, ihtiyacınız olan eklentileri yükleyin.
- 🧰İçerik: Kutools for Excel / Kutools for Outlook / Kutools for Word / Office Tab Pro / Kutools for PowerPoint