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

 Sut i greu ffolder chwilio ar gyfer pob e-bost heb ei ateb yn Outlook?

Os ydych chi am wirio'r e-byst heb eu hateb yn eich Camre, bydd eu chwilio fesul un yn cymryd llawer o amser. Yr erthygl hon, byddaf yn siarad am greu ffolder chwilio ar gyfer yr holl negeseuon na chawsant eu hateb.

Creu ffolder chwilio ar gyfer pob e-bost heb ei ateb yn Outlook gyda chod VBA


Creu ffolder chwilio ar gyfer pob e-bost heb ei ateb yn Outlook gyda chod VBA

Gall y cod VBA canlynol eich helpu i greu ffolder chwilio lle bydd yn rhoi pob e-bost heb ei ateb, gwnewch fel hyn:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Modiwlau Ffenestr.

Cod VBA: Creu ffolder chwilio ar gyfer e-byst heb eu hateb:

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. Yna, pwyswch F5 allwedd i redeg y cod hwn, ac mae blwch prydlon yn cael ei nodi fel y dangosir y llun a ganlyn:

ffolder chwilio doc ar gyfer heb ei gysylltu 1

4. Cliciwch OK botwm, nawr, fe gewch chi E-byst Heb eu hateb ffolder o dan y Chwilio Ffolderi ar gyfer pob cyfrif yn eich Rhagolwg, ac mae'r holl negeseuon e-bost heb eu hateb yn cael eu harddangos yma, gweler y screenshot:

ffolder chwilio doc ar gyfer heb ei gysylltu 2


Kutools for Outlook - Yn Dod â 100 o Nodweddion Uwch i'w Rhagweld, a Gwneud Gwaith yn Haws Osgach!

  • Auto CC / BCC yn ôl rheolau wrth anfon e-bost; Auto Ymlaen E-byst Lluosog yn ôl arfer; Ymateb Auto heb weinydd cyfnewid, a nodweddion mwy awtomatig ...
  • Rhybudd BCC - dangoswch neges pan geisiwch ateb popeth os yw'ch cyfeiriad post yn rhestr BCC; Atgoffwch Wrth Ymlyniadau ar Goll, a mwy o nodweddion atgoffa ...
  • Ymateb (Pawb) Gyda'r Holl Atodiadau yn y sgwrs bost; Ateb Llawer o E-byst mewn eiliadau; Auto Ychwanegu Cyfarchiad wrth ateb; Ychwanegu Dyddiad i'r pwnc ...
  • Offer Ymlyniad: Rheoli Pob Atodiad ym mhob Post, Datgysylltiad Auto, Cywasgu Pawb, Ail-enwi Pawb, Arbed Pawb ... Adroddiad Cyflym, Cyfrif Postiau Dethol...
  • E-byst Sothach Pwerus yn ôl arfer; Tynnwch y Post a Chysylltiadau Dyblyg... Yn eich galluogi i wneud yn ddoethach, yn gyflymach ac yn well yn Outlook.
tab kutools rhagweld kutools tab 1180x121
kutools rhagweld rhagolygon kutools ynghyd â thab 1180x121
 
sylwadau (0)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir