Set style galary pathwdStyleGalleryPath: wdStyleGalleryPath
Sub pathDemo2() Options.DefaultFilePath(wdStyleGalleryPath) = "c:\user\" End Sub