Conas dul go tapa agus fillteán an toraidh cuardaigh in Outlook a oscailt?
In Outlook, is féidir leat ríomhphoist a chuardach bunaithe ar an téacs sonrach leis an bhfeidhm Cuardaigh. Ach má tá tú ag cuardach trí gach mír dearcadh, ní féidir leat fillteán an toraidh cuardaigh a fháil amach go tapa. Sa chás seo, tá roinnt cleasanna agam anseo a chabhróidh leat dul go tapa chuig fillteán an toraidh cuardaigh agus é a oscailt.
Téigh chuig agus oscail fillteán an toraidh cuardaigh le VBA
Téigh go dtí agus fillteán an toraidh cuardaigh le Deaschliceáil agus oscail é
Téigh chuig agus oscail fillteán an toraidh cuardaigh le VBA
In Outlook, níl aon fheidhm ionsuite ann a fhéadfaidh an post seo a láimhseáil, seachas cód VBA.
Sula n-úsáidtear an cód VBA, ní mór duit ainm an fhillteáin a thaispeáint sna torthaí cuardaigh.
1. cliceáil Amharc > Cuir Colúin leis.
2. Sa Taispeáin Colúin dialóg agus i Roghnaigh na colúin atá ar fáil ó liosta anuas, roghnaigh Gach réimse Ríomhphoist, Ansin roghnaigh I bhFillteán sa Colúin atá ar fáil liosta.
3. cliceáil Cuir a chur I bhFillteáin chun Taispeáin na colúin seo san ord seo liosta, ansin cliceáil Éirí suas cnaipe le bogadh I bhFillteán go an barr.
4. cliceáil OK chun dialóg a dhúnadh. Anois agus tú ag cuardach ríomhphoist, taispeánfar ainm an fhillteáin i dtorthaí an chuardaigh.
5. Anois brúigh Alt + F11 eochracha le cumasú Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúil chun Modúl nua a chruthú.
6. Cóipeáil agus greamaigh an cód thíos sa Mhodúl.
VBA: Téigh chuig fillteán de réir ainm
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. Brúigh F5 eochair chun an cód a chumasú, cuir isteach ainm an fhillteáin ar mhaith leat dul isteach sa dialóg anois.
8. cliceáil OK, tagann dialóg amach chun suíomh an fhillteáin a mheabhrú duit, cliceáil Is ea chun dul go díreach chuig an bhfillteán, nó cliceáil Uimh a chur ar ceal.
Téigh go dtí agus fillteán an toraidh cuardaigh le Deaschliceáil agus oscail é
Má tá tú Kutools for Outlook, beidh Fillteán oscailte tá fóntais leabaithe sa roghchlár deaschliceáil ar féidir léi dul go tapa chuig fillteán an ríomhphoist roghnaithe.
Kutools for Outlook , Áirítear 100 + gnéithe agus uirlisí cumhachtacha do Microsoft Outlook 2016, 2013, 2010 agus Office 365. |
||
Suiteáil saor in aisce Kutools for Outlook, agus ansin déan mar atá thíos na céimeanna:
Tar éis cuardach a dhéanamh, cliceáil ar dheis ar an toradh a theastaíonn uait a fhillteán a oscailt, roghnaigh Fillteán oscailte ón roghchlár comhthéacs.
Uirlisí Táirgiúlachta Oifige is Fearr
Kutools for Outlook - Níos mó ná 100 Gnéithe cumhachtacha chun do Outlook a shárú
📧 Uathoibriú Ríomhphoist: As Oifig (Ar fáil do POP agus IMAP) / Sceideal Seol Ríomhphoist / Auto CC/BCC de réir Rialacha Agus Ríomhphost á Sheoladh / Auto Ar Aghaidh (Ardrialacha) / Beannacht Auto Cuir leis / Scoilt Ríomhphoist Ilfhaighteoirí go huathoibríoch i dTeachtaireachtaí Aonair ...
📨 Bainistíocht Ríomhphost: Ríomhphoist a Athghairm go héasca / Bloc Ríomhphoist Scam ag Ábhair agus Daoine Eile / Scrios Ríomhphoist Dúblacha / Cuardach Casta / Comhdhlúthaigh Fillteáin ...
📁 Ceangaltáin Pro: Sábháil Baisc / Baisc Dícheangail / Comhbhrú Baisc / Auto Sábháil / Auto Dícheangail / Comhbhrúite Auto ...
🌟 Draíocht Chomhéadain: 😊Níos mó Emojis Pretty and Cool / Treisiú Do Tháirgiúlacht Outlook le Radhairc Tabbed / Íoslaghdaigh Outlook In ionad Deiridh ...
???? Wonders aon-cliceáil: Freagair Gach Duine le Ceangaltáin Isteach / Ríomhphoist Frith-Iascaireachta / 🕘 Taispeáin Crios Ama an tSeoltóra ...
👩🏼🤝👩🏻 Teagmhálaithe & Féilire: Baisc Cuir Teagmhálacha Ó Ríomhphoist Roghnaithe / Roinn Grúpa Teagmhála ar Ghrúpaí Aonair / Bain Meabhrúcháin Breithlá ...
Thar Gnéithe 100 Fan le do Thaiscéalaíocht! Cliceáil Anseo le Tuilleadh Amach.



