What Solidworks version are you running? Some of the api methods might be outdated.
I have not tested the macro. But are you sure that the New file path is what you expect...? Try to debug your code by add.
and you will see what string you actually have. It will be printed in you Immediate window.
I actually just found the mistake in my macro, thanks though!
I have a function that I use to create the folder if it doesn't exist.
Sub CreatePath(ByVal filepath)
On Error GoTo Ignore
If Not Directory.Exists(filepath) Then