Loncat ke daftar isi utama

Bagaimana cara cepat membuka dan membuka folder hasil pencarian di Outlook?

Di Outlook, Anda dapat mencari email berdasarkan teks tertentu dengan fungsi Pencarian. Namun, jika Anda mencari melalui semua item prospek, Anda tidak dapat dengan cepat menemukan folder hasil pencarian. Dalam hal ini, di sini saya memiliki beberapa trik yang dapat membantu Anda dengan cepat membuka dan membuka folder hasil pencarian.

Buka dan buka folder hasil pencarian dengan VBA

Buka dan buka folder hasil pencarian dengan Klik Kanan


Buka dan buka folder hasil pencarian dengan VBA

Di Outlook, tidak ada fungsi bawaan yang dapat menangani pekerjaan ini, kecuali kode VBA.

Sebelum menggunakan kode VBA, Anda perlu menampilkan nama folder di hasil pencarian.

1. klik View > Tambah Kolom.
doc pergi ke folder terbuka hasil pencarian 1

2. Dalam Tampilkan Kolom dialog dan masuk Pilih kolom yang tersedia dari daftar drop-down, pilih Semua bidang Surat, Lalu pilih Di Folder dalam Kolom yang tersedia daftar.
doc pergi ke folder terbuka hasil pencarian 2

3. klik Add untuk menambahkan Di Folder untuk Tunjukkan kolom-kolom ini dalam urutan ini daftar, lalu klik Pindah ke ATAS tombol untuk bergerak Di Folder ke atas.
doc pergi ke folder terbuka hasil pencarian 3

4. klik OK untuk menutup dialog. Sekarang saat Anda mencari email, nama folder akan ditampilkan di hasil pencarian.
doc pergi ke folder terbuka hasil pencarian 4

5. Sekarang tekan Alt + F11 kunci untuk mengaktifkan Microsoft Visual Basic untuk Aplikasi window, klik Menyisipkan > Modul untuk membuat Modul baru.

6. Salin dan tempel kode di bawah ini ke dalam Modul.

VBA: Buka folder dengan nama

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. tekan F5 untuk mengaktifkan kode, sekarang masukkan nama folder yang ingin Anda tuju ke dalam dialog.
doc pergi ke folder terbuka hasil pencarian 5

8. klik OK, sebuah dialog muncul untuk mengingatkan Anda lokasi folder tersebut, klik Yes untuk langsung membuka folder, atau klik Tidak untuk membatalkan.
doc pergi ke folder terbuka hasil pencarian 6


Buka dan buka folder hasil pencarian dengan Klik Kanan

Jika Anda memiliki Kutools untuk Outlook, akan ada Folder terbuka Utilitas embed di menu klik kanan yang dapat dengan cepat masuk ke folder email yang dipilih.

Kutools for Outlook , Termasuk 100 + fitur dan alat canggih untuk Microsoft Outlook 2016, 2013, 2010, dan Office 365.

Instal gratis Kutools for Outlook, lalu lakukan langkah-langkah di bawah ini:

Setelah mencari, klik kanan pada hasil yang ingin Anda buka foldernya, pilih Folder terbuka dari menu konteks
doc pergi ke folder terbuka hasil pencarian 7


Alat Produktivitas Kantor Terbaik

Kutools untuk Outlook - Lebih dari 100 Fitur Canggih untuk Meningkatkan Outlook Anda

🤖 Asisten Surat AI: Email profesional instan dengan keajaiban AI--satu klik untuk mendapatkan balasan jenius, nada sempurna, penguasaan multibahasa. Ubah email dengan mudah! ...

📧 Email Otomatis: Di Luar Kantor (Tersedia untuk POP dan IMAP)  /  Jadwal Kirim Email  /  Auto CC/BCC Sesuai Aturan Saat Mengirim Email  /  Penerusan Otomatis (Aturan Lanjutan)   /  Tambah Salam Otomatis   /  Secara Otomatis Membagi Email Multi-Penerima menjadi Pesan Individual ...

📨 email Management: Mengingat Email dengan Mudah  /  Blokir Email Penipuan berdasarkan Subjek dan Lainnya  /  Hapus Email Duplikat  /  Pencarian  /  Konsolidasi Folder ...

📁 Lampiran ProPenyimpanan Batch  /  Pelepasan Batch  /  Kompres Batch  /  Penyimpanan otomatis   /  Lepaskan Otomatis  /  Kompres Otomatis ...

🌟 Antarmuka Ajaib: 😊Lebih Banyak Emoji Cantik dan Keren   /  Tingkatkan Produktivitas Outlook Anda dengan Tampilan Tab  /  Minimalkan Outlook Daripada Menutup ...

👍 Keajaiban sekali klik: Balas Semua dengan Lampiran Masuk  /   Email Anti-Phishing  /  🕘Tampilkan Zona Waktu Pengirim ...

👩🏼‍🤝‍👩🏻 Kontak & Kalender: Batch Tambahkan Kontak Dari Email yang Dipilih  /  Bagi Grup Kontak menjadi Grup Individual  /  Hapus Pengingat Ulang Tahun ...

Lebih 100 Fitur Tunggu Eksplorasi Anda! Klik Di Sini untuk Menemukan Lebih Banyak.

 

 

Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
HI Guys,
Will this scroll the folder pane as well?  Most of the time the folder is selected but the folder location doesnt get scrolled to  in the folder pane?
Cheers,

This comment was minimized by the moderator on the site
Deleted emails Folder
This comment was minimized by the moderator on the site
Hi, Red McKenna, each account has each deleted forlder, it is called Deleted items.
This comment was minimized by the moderator on the site
Where is the deleted email folder?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations