質問: "aaa\bbb\ccc\ddd\eee\zzz" 上記のような処理を行うコードをもう少しスマートに書きたいのですが、お力を貸していただけないでしょうか?
回答: 一応考えてみましたが、大して変わり映えしないですね。 ``` ps = Split(Path, "\") base = Left(base, InStr(base, ps(0)) - 1) & Path ``` しかもPathの最初の区切りまでがBaseに存在することが前提です。 ないとエラーになります。