Cookies matulungan kaming ihatid ang aming mga serbisyo. Sa pamamagitan ng paggamit sa aming mga serbisyo, sumasang-ayon ka sa aming paggamit ng cookies.
Tip: Iba pang mga wika ay isinaling-Google. Maaari mong bisitahin ang English bersyon ng link na ito.
mag-log in
x
or
x
x
Magrehistro
x

or

Paano buksan ang lahat ng mga subfolder mula sa Outlook?

Kung lumikha ka ng maraming mga subfolder sa ilalim ng iyong mga folder ng Outlook, paano mo buksan o palawakin ang lahat ng mga subfolder na ito kaagad? Ang artikulong ito, ipakikilala ko ang isang kapaki-pakinabang na VBA code para malutas mo ang trabahong ito.

Buksan o palawakin ang lahat ng mga subfolder mula sa Outlook gamit ang VBA code


Buksan o palawakin ang lahat ng mga subfolder mula sa Outlook gamit ang VBA code

Mangyaring ilapat ang sumusunod na code ng VBA upang palawakin ang lahat ng mga subfolder mula sa lahat ng mga Outlook account:

1. I-hold ang ALT + F11 key upang buksan ang Microsoft Visual Basic para sa Mga Application window.

2. I-click ang Isingit > Module, at i-paste ang sumusunod na macro sa Window ng Module.

VBA code: Buksan ang lahat ng mga subfolder mula sa Outlook:

Sub ExpandAllMailFolders () Dim xCurrentFolder Bilang Folder Dim xAllFolders Bilang Folder Dim xFolder Bilang Folder On Error Ipagpatuloy Susunod na Set xCurrentFolder = Application.ActiveExplorer.CurrentFolder Itakda xAllFolders = Application.Session.Folder Para sa bawat xFolder Sa xAllFolders Tumawag ProcessFolders (xFolder) Susunod Itakda ang Application. ActiveExplorer.CurrentFolder = xCurrentFolder End Sub Sub ProcessFolder (ByVal CurFolder Bilang Folder) Dim xSubfolder Bilang Folder On Error Ipagpatuloy Susunod Kung CurFolder.DefaultItemType <> olMailItem Pagkatapos Lumabas Sub Set Application.ActiveExplorer.CurrentFolder = CurFolder DoEvents Kung CurFolder.Folders.Count = 0 Pagkatapos Lumabas Sub Para sa bawat xSubfolder Sa CurFolder.Folders Call ProcessFolders (xSubfolder) Susunod na End Sub

3. Pagkatapos ay pindutin F5 susi upang patakbuhin ang code na ito, at ang lahat ng mga subfolder sa lahat ng mga account ng iyong Outlook ay pinalawak, tingnan ang screenshot:

doc palawakin ang mga subfolder na 1



Kutools para sa Outlook

Higit sa 100 Advanced na Mga Function para sa Outlook 2010, 2013, 2016, 2019 at 365

screen shot kutools para sa pananaw maliit na maliit para sa banner 201812

Higit pang mga Tampok | Libreng pag-download | Tanging $ 39.00 para sa daan-daang mga pag-andar

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.