You can retrieve the parent directory from a path by identifying the first and last backslash. The start position for the first backslash should be 3 in order for it to handle UNC paths. By skipping the last character, the path may or may not include an ending backslash.
Public Function ParentPath(Path As String) As StringDim Last As LongDim First As Long Last = InStrRev(Path,