How to shorten up folder pathway with this workbook.path

how can I shorten up this line with my 'Dir' Names I am moving and renaming a file within the same older path can I eliminate the way I have it.... some times the location changes but it will always be in the same folder.

I have 2 directories

Please Login or Register  to view this content.

this line works if i describe the path using the one below but needs to be adjust to work with my "EDir & EDir2"

Please Login or Register  to view this content.

I tried but it did not work

Please Login or Register  to view this content.

Thanks

You’ve marked this thread as solved - is it?

In case it isn't.

Please Login or Register  to view this content.