Outlook'ta bir e-posta mesajını okuduktan sonra onu belirtilen klasöre nasıl taşıyabilirim?

E-posta mesajlarını okuduktan sonra belirtilen bir klasöre taşımak, Outlook’ta Gelen Kutusu’nu temiz ve düzenli tutmanın en etkili yoludur. Pek çok Outlook kullanıcısı, bu okunmuş e-postaları otomatik olarak taşıyabilmek için bir kural oluşturmayı tercih eder. Ancak Outlook, bu tür bir işlemi gerçekleştiren yerleşik bir kural sihirbazı sunmaz. Bu makalede, Outlook’ta VBA kodu kullanarak e-posta mesajlarını okuduktan sonra belirtilen klasöre nasıl taşıyacağınızı adım adım göstereceğiz.

Outlook'ta e-posta mesajını okuduktan sonra belirtilen klasöre taşıma

Outlook'ta e-posta mesajını okuduktan sonra belirtilen klasöre taşıma

Outlook’ta VBA kodunu çalıştırarak e-posta mesajlarını okuduktan sonra bunları belirtilen klasöre taşıyabilirsiniz.

1. İlk olarak, Gelen Kutusu klasörünün altında “İncelendi” adında yeni bir klasör oluşturmanız gerekir.

2. Gelen Kutusu klasörünü açın ve ardından Alt+F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

3. Ardından, Project1 > Microsoft Outlook Nesneleri > ThisOutlookSession öğesini genişletmek için çift tıklayın ve böylece VbaProject.OTM düzenleyicisini açın.

4. Ardından aşağıdaki VBA kodunu kopyalayın ve yukarıdaki ekran görüntüsünde gösterildiği gibi VbaProject.OTM düzenleyicisine yapıştırın.

VBA kodu: okunduktan sonra mesajları taşı

Sub MoveInbox2Reviewed()
On Error Resume Next
Set oOutlook = CreateObject("Outlook.Application")
Set oNamespace = oOutlook.GetNamespace("MAPI")
Set oFolderSrc = oNamespace.GetDefaultFolder(olFolderInbox)
Set oFolderDst = oFolderSrc.Folders("Reviewed")
Set oFilteredItems = oFolderSrc.Items.Restrict("[UnRead] = False")
For Each oMessage In oFilteredItems
    oMessage.Move oFolderDst
Next
End Sub 

5. Ardından VBA kodunu kaydetmek için Kaydet düğmesine tıklayın ve ardından Microsoft Visual Basic for Applications penceresini kapatın.

6. Hızlı Erişim Araç Çubuğu'na sağ tıklayın ve sağ tıklama menüsünden Hızlı Erişim Araç Çubuğunu Özelleştir seçeneğini seçin. Ekran görüntüsüne bakın:

7. Outlook Seçenekleriiletişim kutusunda şunları yapmanız gerekir:

1).Makrolarseçeneğini Şu komutlardan seçAçılır Liste listesinden seçin;

2). Project1. ThisOutlookSession öğesini, Şu komutlardan seç açılır liste kutusundan seçin;

3).Ekledüğmesine tıklayın;

4). Tamam düğmesine tıklayın.

8. Ardından Makro düğmesinin Hızlı Erişim Araç Çubuğu'nda göründüğünü göreceksiniz. Tüm okunmuş mesajları taşımak istediğiniz Gelen Kutusu klasöründe olduğunuzdan emin olduktan sonra, VBA kodunu çalıştırmak için Makro düğmesine tıklayın.

Notlar:

1. Bu VBA kodu Outlook 2007, 2010 ve 2013 sürümlerinde uygulanabilir; ancak Outlook 2007'de doğrudan Çalıştır düğmesine tıklayarak kodu çalıştırabilirsiniz.

2. Outlook'ta birden fazla e-posta hesabınız varsa, VBA kodu yalnızca "Varsayılan Olarak Ayarla" seçeneği işaretlenmiş olan hesabın veri dosyasına uygulanabilir. Varsayılan veri dosyanızı kontrol etmek için Dosya > Bilgi > Hesap Ayarları > Hesap Ayarları seçeneğine tıklayarak Hesap Ayarları iletişim kutusunu açın. Ardından Veri Dosyası sekmesine gidin; varsayılan veri dosyasının önünde işaretini göreceksiniz.

3. Varsayılan veri dosyasını başka bir e-posta hesabına değiştirmek istiyorsanız, lütfen istediğiniz hesabı seçin, vurgulayın ve ardından Varsayılan Olarak Ayarla seçeneğine Hesap Ayarlarıiletişim kutusunda tıklayın.

4. VBA kodunu ilk kez çalıştırdığınızda ve okunmuş mesajların hepsinin aynı anda taşınmadığını fark ettiğinizde, Gelen Kutusu’ndaki tüm okunmuş mesajlar taşınıncaya kadar Makro düğmesine tıklamaya devam edin.

---

En İyi Office Verimlilik Araçları

Yepyeni Kutools for Outlook’i 100+ inanılmaz özelliğiyle deneyimleyin!Şimdi indirmek için tıklayın!

🤖KUTOOLS AI:E-postaları yanıtlama, özetleme, iyileştirme, uzatma, çevirme ve oluşturma dahil olmak üzere zahmetsizce yönetmek için gelişmiş yapay zeka teknolojisi kullanır.

📧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ğer Özelliklere Göre Dolandırıcı E-postaları Engelleme/Yinelenen E-postaları Silme/Gelişmiş Arama/Klasörleri Düzenleme…

📁Ekler Pro: Toplu Kaydetme, Toplu Ayırma, Toplu Sıkıştırma, 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ıklamayla 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!

Kutools for Outlook’un kilidini tek tıkla hemen açın! Beklemeyin, şimdi indirin ve verimliliğinizi artırın!

Kutools for Outlook Özellik Listesi      Şimdi İndir      Satın Alma Sayfasına Git

🚀 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ıklama kolaylığı: Tüm 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

Paket Hakkında⬇ Paketi İndir💳 Paketi Satın Al