How to link to a file one folder up.

[kane]

I got what I wanted with this. Where the name of the folder was "1.0"

Dim FilePathIs
FilePathIs = Left(ThisWorkbook.Path, Len(ThisWorkbook.Path) - 3)
ActiveWorkbook.FollowHyperlink FilePathIs & "Base.xls"

Any better ideas still accepted.