MsgBox ActiveWorkbook.Path
晕,原来是没有保存文件的原因,感谢,问题解决了!
返回应用程序完整路径
Application.Path
返回当前工作薄的路径
ThisWorkbook.Path
返回当前默认文件路径:
Application.DefaultFilePath
Application.ActiveWorkbook.Path 只返回路径
Application.ActiveWorkbook.FullName 返回路径及工作簿文件名
Application.ActiveWorkbook.Name 返回工作簿文件名
ThisWorkbook.Path 这个获取当前excel文件路径