返回与设置EXCEL路径相关

lss001

Sub 返回与设置路径相关()


   '返回路径分隔符：只读
   s15 = Application.PathSeparator
   
   '返回应用程序路径：只读
   s1 = Application.Path
   '返回或设置打开文件时使用的默认路径：读/写
   s2 = Application.DefaultFilePath
   '''Application.DefaultFilePath = ""
   
   '返回保存模板的本地路径：只读
   s3 = Application.TemplatesPath
   '返回保存模板的网络路径：只读
   s8 = Application.NetworkTemplatesPath
   
   '返回启动文件夹路径：只读
   s4 = Application.StartupPath
   '返回或设置启动文件夹路径：读/写
   s5 = Application.AltStartupPath
   '''Application.AltStartupPath = ""
   
   '返回Library文件夹路径：只读
   s6 = Application.LibraryPath
   '返回COM加载项路径：只读
   s7 = Application.UserLibraryPath
   
   '返回当前文件路径：只读
   s9 = ActiveWorkbook.Path
   '返回当前文件路径\文件名：只读
   s10 = ActiveWorkbook.FullName
   '返回当前文件磁盘路径\文件名：只读
   s11 = ActiveWorkbook.FullNameURLEncoded
   
   '返回当前工作簿vbe文件路径(仅在vbe内部使用)：只读
   s12 = ThisWorkbook.Path
   '返回当前工作簿vbe文件路径\文件名：只读
   s13 = ThisWorkbook.FullName
   '返回当前工作簿vbe文件磁盘路径\文件名：只读
   s14 = ThisWorkbook.FullNameURLEncoded


End Sub