How to expand the Folder Pane in Outlook 2024

Table of Contents Show

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.