How to expand the Folder Pane in Outlook

How to expand the Folder Pane, the folder Pane on the left of outlook’s window displays all your folders in its expanded view. Users also shrink this pane. So it doesn’t display folders.

But when users re-expand this Folder Pane from minimized view, it doesn’t stay expanded when users click outside of it. This is why some users wonder how they can keep the expanded Folder Pane view stable after shrinking it.

We inform you about how to expand Folder Pane methods.

How do I keep Outlook’s Folder Pane expanded?

1. Set the Folder Bin

Because you can restore the default extended Folder Pane by setting the folder Bin. To do this, select the View tab.

Then press the Folder Pane button shown below.

Choose the Normal option.

2.Click the pin button

Alternatively, users click the pin button in the upper-right corner of the Folder Pane. Expand the Minimized Folder Pane by clicking the arrow button (>) above it.

Then click the pin button in the snapshot directly below. After that, the Folder Pane remains open when you click it.

3. Install a VBA macro that automatically expands folders when Outlook starts

Make sure that all folders in the Folder Pane are fully expanded when you open Outlook. Because choose a VBA macro that opens all collapsed folders when the application starts. Open Outlook’s Visual Basic for Applications window with the Alt + F11 hotkey.

Click on Project1 on the left of the window.

Because expand microsoft Outlook Objects and double click ThisOutlookSession to open a code window.

Select and copy this VBA code with the Ctrl + C hotkey:

• Private Sub Application_Startup()
• ExpandAllFolders
• End SubPrivate Sub ExpandAllFolders() Hatada
• Continue Next
• Dim Ns As Outlook.NameSpace
• Dim Folders Outlook.Folders
• Dim CurrF As Outlook.MAPIFolder
• Dim F As Outlook.MAPIFolder
• Dim ExpandDefaultStoreOnly As BooleanExpandDefaultStoreOnly = FalseSet Ns = Application.GetNamespace(“Mapi”)
• Set CurrF = Application.ActiveExplorer.CurrentFolderIf ExpandDefaultStoreOnly = True Then F Set F
• = Ns.GetDefaultFolder(olFolderInbox)
• Set
• .Folders
• LoopFolders Folders, True
• Else
• LoopFolders Ns.Folders, True
• End If
• DoEvents
• Set Application.ActiveExplorer.CurrentFolder = CurrF
• End Sub
• Private Sub LoopFolders(Folders As Outlook.Folders, _
• ByVal bRecursive As Boolean _)
• Dim F As Outlook.MAPIFolder
• For Each F in Folders
• Set Application.ActiveExplorer.CurrentFolder = F
• DoEvents
• bRecursive ise O
• time F.Folders.Count
• LoopFolders F.Folders, bRecursive
• End If
• End If
• Next
• End Sub

Paste this macro into the code window with the Ctrl + V hotkey. Click on File and save the macro. After that, the macro when you start Outlook. Automatically opens collapsed folders in the Folder Pane.

You can also review our article on how to add an Outlook account.

How to expand the Folder Pane in Outlook first appeared on TeknoDestek.