Kiat: Bahasa lain adalah Terjemahan-Google. Anda dapat mengunjungi English versi link ini
Masuk
x
or
x
x
Daftar
x

or

Bagaimana cara membuat folder pencarian untuk semua email yang tidak dijawab di Outlook?

Jika Anda ingin memeriksa email yang tidak dijawab di Outlook Anda, untuk mencari mereka satu per satu akan memakan banyak waktu. Artikel ini, saya akan berbicara tentang membuat folder pencarian untuk semua pesan yang tidak menjawab.

Buat folder pencarian untuk semua email yang tidak dijawab di Outlook dengan kode VBA


Buat folder pencarian untuk semua email yang tidak dijawab di Outlook dengan kode VBA

Kode VBA berikut dapat membantu Anda membuat folder pencarian di mana akan memasukkan semua email yang tidak dijawab, harap lakukan seperti ini:

1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan paste makro berikut di Modul Jendela.

Kode VBA: Buat folder pencarian untuk email yang tidak dijawab:

Sub CreateSearchFolder_AllNotRepliedEmails()
    Dim xSearch As Outlook.Search
    Dim xScope As String, xFilter As String
    Dim xRepliedProperty As String
    Dim xFolder As Folder, xSubFolder As Folder
    On Error Resume Next
    xScope = ""
    For Each xFolder In Outlook.Application.Session.Folders
        Set xSubFolder = xFolder.Folders("Inbox")
        xScope = "'" + xSubFolder.FolderPath + "'"
        xRepliedProperty = "http://schemas.microsoft.com/mapi/proptag/0x10810003"
        xFilter = Chr(34) & xRepliedProperty & Chr(34) & " <> 102" & "AND" & Chr(34) & xRepliedProperty & Chr(34) & " <> 103"
        Set xSearch = Outlook.Application.AdvancedSearch(Scope:=xScope, Filter:=xFilter, SearchSubFolders:=True, Tag:="SearchFolder")
        xSearch.Save("Not Replied Emails").ShowItemCount = olShowTotalItemCount
        Set xSearch = Nothing
        Set xSubFolder = Nothing
    Next
    MsgBox "Search folder is created successfully!", vbInformation + vbOKOnly, "Kutools for Outlook"
End Sub

3. Lalu tekan F5 kunci untuk menjalankan kode ini, dan kotak prompt muncul sebagai screenshot berikut yang ditunjukkan:

folder pencarian dokumen untuk 1 yang tidak dikukuhkan

4. Klik OK tombol, sekarang, Anda akan mendapatkan Tidak Membalas Email folder di bawah Cari Folder untuk setiap akun di Outlook Anda, dan semua email yang tidak dijawab ditampilkan di sini, lihat screenshot:

folder pencarian dokumen untuk 2 yang tidak dikukuhkan



Kutools for Outlook

Lebih dari 100 Fungsi Lanjut untuk Outlook 2010, 2013, 2016, 2019 dan 365

tangkapan layar kutools untuk outlook mungil untuk spanduk 201812

Fitur Lebih | Free download | Hanya $ 39.00 untuk ratusan fungsi

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.