Set current folder path: wdCurrentFolderPath
Sub pathDemo5() Options.DefaultFilePath(wdCurrentFolderPath) = "c:\user\" End Sub