[RESOLVED] extract a part of a path to a variable

[elmnas]

Hello people,

I use this code to navigate one level up

FilePath = Left(ActiveWorkbook.Path, InStrRev(ActiveWorkbook.Path, "\")) 

my problem is..

I need to go up two levels up

here is a example here is the whole path

C:/test/123/source

my code make this result

C:/test/123/

I need to extract the number to a variable

could someone help me ?