一つ前のフォルダのパスを取得 (ID:115847)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Dim Temp() As String Temp = Split(App.Path, "\") ReDim Preserve Temp(UBound(Temp) - 1) Debug.Print Join(Temp, "\") & "\hoge2" こんな方法しか思いつかないです。 ..\などを使ってあっさりとれないものでしょうか？