如何获取Excel的环境参数：
Debug.Print Application.AltStartupPath '传回取代启动文件夹的名称
Debug.Print ActiveWorkbook.Path '传回目前工作簿的路径(档案未存盘时传回空字符串)
Debug.Print ActiveWorkbook.FullName '现用目前工作簿的路径及文件名称(档案未存盘时只传回暂存盘名)
Debug.Print Application.NetworkTemplatesPath '传回存储模板所在的网络路径，如果指定的网络路径不存在，本属性将传回一空字符串
Debug.Print Application.TemplatesPath '传回存储范本所在的区域路径
Debug.Print Application.Path '传回Excel软件完整路径
Debug.Print Application.DefaultFilePath '传回或者设定 Microsoft Excel 开启档案时使用的预设路径
Debug.Print Application.StartupPath '传回启动文件夹的完整路径
Debug.Print Application.LibraryPath '传回软件库文件夹的路径
Debug.Print Application.UserLibraryPath '传回使用者计算机上 COM 加载宏安装位置的路径(2000以上)
Debug.Print Application.PathSeparator '传回路径分隔符
Debug.Print CurDir
