' Open a single pane Explorer window' sRoot is the root folder to open' bUpwardAllowed specifies whether the user will be allowed to navigate ' upward the root'' Example:' OpenSinglePaneExplorer "D:Webmaster", FalseSub OpenSinglePaneExplorer(Optional ByVal sRoot As String, _ Optional ByVal bUpwardAllowed As Boolean = True) Shell "explorer " & IIf(bUpwardAllowed, " /n", "") & " /root," & sRoot, _ vbNormalFocusEnd Sub