How to display a “Browse for Folder“ dialog for choosing a folder in Outlook?
For a large number of folders in your outlook, it will be convenient for you to choose a specified folder from a “Browse for Folder” dialog box instead of browsing the folder structure for finding it. This article will show you method of displaying a “Browse for Folder” dialog for choosing a folder in Outlook.
Excel Productivity Tools
Office Tab: Bring powerful tabs to Office (include Excel), just like Chrome, Safari, Firefox and Internet Explorer. Save you half the time, and reduce thousands of mouse clicks for you. 30-day Unlimited Free Trial
Kutools for Excel: Save 70% of your time and solve 80% Excel problems for you. 300+ advanced features designed for 1500+ work scenario, make Excel much easy and increase productivity immediately.60-day Unlimited Free Trial
Please do as follows to display a “Browse for Folder” dialog for choosing a folder with VBA code.
1. Press the Alt + F11 keys to open the Microsoft Visual Basic for Applications window.
2. In the Microsoft Visual Basic for Applications window, click Insert > Module. Then copy below VBA code into the Module window.
VBA code: Display a “Browse for Folder” dialog for choosing a folder
Sub PickFolder() 'Update by Extendoffice 20180504 Dim xNameSpace As NameSpace Dim xPickFolder As Folder Dim xExplorer As Explorer On Error Resume Next Set xNameSpace = Outlook.Application.Session Set xPickFolder = xNameSpace.PickFolder If TypeName(xPickFolder) = "Nothing" Then Exit Sub Set xExplorer = Outlook.Application.ActiveExplorer xExplorer.Close xPickFolder.Display Outlook.Application.ActiveExplorer.WindowState = olMaximized Set xPickFolder = Nothing Set xNameSpace = Nothing End Sub
3. Press the Alt + Q keys to exit the Microsoft Visual Basic for Applications window.
4. Click the Customize Quick Access Toolbar button and then click More Commands from the drop-down menu. See screenshot:
5. In the Outlook Options dialog box, you need to:
5.1 Select Macros from the Choose commands from drop-down list;
5.2 Select the macro name Project1.FolderPick from the commands box;
5.3 Click the Add button;
5.4 Keep selecting the FolderPick in the right Customize Quick Access Toolbar box, and then click the Modify button;
5.5 Select a modify button for the macro and then click the OK button;
5.6 Click the OK button to close the Outlook Options dialog box. See screenshot:
6. Then you can see a folder button showing on the Quick Access Toolbar. Click on the button to display the “Select Folder” dialog, select a folder and click the OK button. See screenshot:
Then the selected folder will be opened in Outlook immediately.