Note: The other languages of the website are Google-translated. Back to English

Outlook'ta arama sonucu klasörüne nasıl hızlı bir şekilde gidip açılır?

Outlook'ta, Arama işlevi ile belirli bir metne göre e-postalarda arama yapabilirsiniz. Ancak, tüm görünüm öğelerinde arama yapıyorsanız, arama sonucunun bulunduğu klasörü hızlı bir şekilde bulamazsınız. Bu durumda, burada, arama sonucunun bulunduğu klasöre hızlı bir şekilde gidip açmanıza yardımcı olabilecek bazı hilelerim var.

VBA ile arama sonucu klasörüne gidin ve açın

Sağ Tıkla arama sonucu klasörüne gidin ve açın


VBA ile arama sonucu klasörüne gidin ve açın

Outlook'ta, VBA kodu dışında bu işi halledebilecek yerleşik bir işlev yoktur.

VBA kodunu kullanmadan önce, aranan sonuçlarda klasör adını görüntülemeniz gerekir.

1. tık Görüntüle > Sütun ekle.
doc, arama sonucu 1'in açık klasörüne git

2. içinde Sütunları Göster diyalog ve içinde Kullanılabilir sütunları seçin açılan listeden Tüm Posta alanları, Daha sonra seçmek Klasörde içinde Kullanılabilir sütunlar liste.
doc, arama sonucu 2'in açık klasörüne git

3. tık Ekle eklemek Klasörlerde için Bu sütunları bu sırayla gösterin liste, ardından tıklayın Yukarı Taşı hareket ettirmek için düğme Klasörde üst.
doc, arama sonucu 3'in açık klasörüne git

4. tık OK iletişim kutusunu kapatmak için. Artık e-postaları ararken, klasör adı arama sonuçlarında görüntülenecektir.
doc, arama sonucu 4'in açık klasörüne git

5. Şimdi basın Alt + F11 etkinleştirmek için anahtarlar Uygulamalar için Microsoft Visual Basic Pencere, tıklayın Ekle > modül yeni bir Modül oluşturmak için.

6. Aşağıdaki kodu kopyalayıp Modüle yapıştırın.

VBA: Klasöre bir ada göre git

Sub FindFolderByName()
'UpdatebyExtendoffice20181105
    Dim xFldName As String
    Dim xFoundFolder As Folder
    Dim xYesNo As Integer
    On Error Resume Next
    xFldName = InputBox("Folder Name:", "Kutools for Outlook")
    If Len(Trim(xFldName)) = 0 Then Exit Sub
    Set xFoundFolder = ProcessFolders(Application.Session.Folders, xFldName)
    If xFoundFolder Is Nothing Then
        MsgBox "Not Found", vbInformation, "Kutools for Outlook"
        Exit Sub
    End If
    xYesNo = MsgBox("Activate Folder: " & vbCrLf & xFoundFolder.FolderPath, vbQuestion Or vbYesNo, "Kutools for Outlook")
    If xYesNo = vbNo Then Exit Sub
    Set Application.ActiveExplorer.CurrentFolder = xFoundFolder
End Sub
Function ProcessFolders(Flds As Outlook.Folders, Name As String)
    Dim xSubFolder As Outlook.MAPIFolder
    On Error Resume Next
    Set ProcessFolders = Nothing
    For Each xSubFolder In Flds
        If UCase(xSubFolder.Name) = UCase(Name) Then
            Set ProcessFolders = xSubFolder
            Exit For
        Else
            Set ProcessFolders = ProcessFolders(xSubFolder.Folders, Name)
            If Not ProcessFolders Is Nothing Then Exit For
        End If
    Next
End Function

7. Basın F5 kodu etkinleştirmek için tuşuna basın, şimdi gitmek istediğiniz klasör adını iletişim kutusuna girin.
doc, arama sonucu 5'in açık klasörüne git

8. tık OK, size klasörün konumunu hatırlatmak için bir iletişim kutusu açılır, Evet doğrudan klasöre gitmek için veya Yok hayır iptal etmek.
doc, arama sonucu 6'in açık klasörüne git


Sağ Tıkla arama sonucu klasörüne gidin ve açın

Eğer varsa Outlook için Kutoolsbir olacak Açık dosya yardımcı program, seçilen e-postanın klasörüne hızlı bir şekilde gidebilen sağ tıklama menüsüne gömülür.

Kutools for Outlook , Kapsar 100'den fazla Microsoft Outlook 2016, 2013, 2010 ve Office 365 için güçlü özellikler ve araçlar.

Ücretsiz kurulum Outlook için Kutools ve ardından aşağıdaki adımları uygulayın:

Arama yaptıktan sonra, klasörünü açmak istediğiniz sonuca sağ tıklayın, seçin Açık dosya bağlam menüsünden.
doc, arama sonucu 7'in açık klasörüne git


Outlook için Kutools - Outlook'a 100 Gelişmiş Özellik Getirir ve Çalışmayı Çok Daha Kolay Hale Getirir!

  • Otomatik CC / BCC e-posta gönderirken kurallara göre; Otomatik İleri Özel olarak birden çok E-posta; Otomatik cevap değişim sunucusu olmadan ve daha fazla otomatik özellik ...
  • BCC Uyarısı - tümünü yanıtlamaya çalıştığınızda mesaj göster posta adresiniz BCC listesindeyse; Eksik Olduğunda Hatırlatve daha fazlası özellikleri hatırlat ...
  • Posta görüşmesindeki Tüm Eklerle Yanıtla (Tümü); Birçok E-postayı Yanıtla saniyeler içinde; Otomatik Karşılama Ekleme cevap verdiğinde; Konuya Tarih Ekle ...
  • Ek Araçları: Tüm Postalardaki Tüm Ekleri Yönetin, Otomatik Ayır, Tümünü Sıkıştır, Tümünü Yeniden Adlandır, Tümünü Kaydet ... Hızlı Rapor, Seçili Postaları Say...
  • Güçlü Önemsiz E-postalar özel olarak; Yinelenen Postaları ve Kişileri Kaldır... Outlook'ta daha akıllı, daha hızlı ve daha iyi yapmanızı sağlar.
shot kutools görünüm kutools sekmesi 1180x121
shot kutools görünüm kutools artı sekme 1180x121
 
Yorumları sıralama ölçütü
Yorumlar (4)
Henüz derecelendirme yok. İlk değerlendiren siz olun!
Bu yorum sitedeki moderatör tarafından en aza indirildi
Silinen e-posta klasörü nerede?
Bu yorum sitedeki moderatör tarafından en aza indirildi
Silinen e-postalar Klasörü
Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba, Red McKenna, her hesapta silinen her bir forlder vardır, buna Silinmiş öğeler denir.
Bu yorum sitedeki moderatör tarafından en aza indirildi
HI Guys,
Bu, klasör bölmesini de kaydırır mı? Çoğu zaman klasör seçilir, ancak klasör konumu klasör bölmesinde kaydırılmaz mı?
Alkış,

Buraya henüz hiç yorum yapılmamış
Lütfen yorum yazın
Misafir olarak yayınlama
×
Bu gönderiyi değerlendirin:
0   Karakterler
Önerilen Konumlar

Bizi takip et

Telif Hakkı © 2009 - www.extendoffice.com. | Tüm hakları Saklıdır. Tarafından desteklenmektedir ExtendOffice. | | | Site Haritası
Microsoft ve Office logosu, Microsoft Corporation'ın Amerika Birleşik Devletleri ve / veya diğer ülkelerdeki ticari markaları veya tescilli ticari markalarıdır.
Sectigo SSL ile korunmaktadır