Application VisualBasic Script

Sub pathDemo7()
    Options.DefaultFilePath(wdToolsPath) = "c:\user\"
End Sub