VBA Full path without the file name?

[knifey]

Hi,
I have a full path and file name held in a string variable. Is there an easy way to get the full path without the file name?
Maybe outputFileName & .Parent.Name or something similair?
Any advice would be much appreciated.
Thanks,
K

 

[bubba100]

In Excel

Dim strPath As String
strPath = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name

 

[strongm]

MsgBox CreateObject("scripting.filesystemobject").GetParentFolderName(strPathAndFile)

 

[xlbo]

If you already have a string with both in then:

strPath = Left(FullPathAndName,instrrev(FullPathAndName,"\"))

Rgds, Geoff

We could learn a lot from crayons. Some are sharp, some are pretty and some are dull. Some have weird names and all are different colours but they all live in the same box.

Please read FAQ222-2244 before you ask a question