Set border art path: wdBorderArtPath
Sub pathDemo3() Options.DefaultFilePath(wdBorderArtPath) = "c:\user\" End Sub