Evästeet auttavat meitä tarjoamaan palveluitamme. Käyttämällä palveluitamme, hyväksyt evästeiden käytön.
Vihje: Muut kielet ovat Google-käännettyjä. Voit vierailla English tämän linkin versio.
Kirjaudu
x
or
x
x
Rekis.
x

or

Miten kaikki alikansiot avataan Outlookista?

Jos luot useampia alikansiot Outlook-kansioissasi, kuinka voit avata tai laajentaa kaikki nämä alikansiot välittömästi? Tässä artikkelissa otan käyttöön hyödyllisen VBA-koodin, jolla voit ratkaista tämän työn.

Avaa tai laajenna kaikki alikansiot Outlookista VBA-koodilla


Avaa tai laajenna kaikki alikansiot Outlookista VBA-koodilla

Ole hyvä ja käytä seuraavaa VBA-koodia kaikkien alikansioiden laajentamiseksi kaikista Outlook-tileistä:

1. Pidä alhaalla ALT + F11 avaimet avaamaan Microsoft Visual Basic for Applications ikkunassa.

2. Klikkaus liite > Moduulit, ja liitä seuraava makro Moduuli-ikkunaan.

VBA-koodi: Avaa kaikki alikansiot Outlookista:

Sub ExpandAllMailFolders () Dim xCurrentFolder As Folder Dim xAllFolders kansioina Dim xFolder as Folder On Error Resume Seuraava Aseta xCurrentFolder = Application.ActiveExplorer.CurrentFolder Aseta xAllFolders = Application.Session.Folders jokaiselle xFolder In xAllFolders Call ProcessFolders (xFolder) Next Set Application. ActiveExplorer.CurrentFolder = xCurrentFolder Loppu Sub Sub ProcessFolders (ByVal CurFolder nimellä kansio) Dim xSubfolder As Folder On Error Resume Next Jos CurFolder.DefaultItemType <> olMailItem Poistu sitten Sub Set Application.ActiveExplorer.CurrentFolder = CurFolder DoEvents Jos CurFolder.Folders.Count = 0 Sitten Exit Sub jokaiselle xSubfolder-ohjelmalle CurFolder.Folders Call ProcessFolders (xSubfolder) Next End Sub

3. Paina sitten F5 avain tämän koodin suorittamiseen ja kaikkien Outlookin kaikkien tilien alikansioita on laajennettu, katso kuvakaappaus:

doc laajentaa alikansioita 1



Kutools for Outlook

Enemmän kuin 100-lisätoimintoja Outlook 2010ille, 2013ille, 2016ille, 2019ille ja 365ille

näytön laukaus kutools näkymää varten pieni banner 201812

Lisää ominaisuuksia | Ilmainen lataus | Vain $ 39.00 satoja toimintoja varten

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.