ExcelVBA在打开和保存工作簿时都需要用到工作簿在硬盘中的存储路径。如果采用“硬编码”的方式，也就是说直接在代码中为工作簿的路径赋值一个固定的值，那么一旦路径名称改变或者工作簿被复制到其他位置，就会遇到问题，这样一来，要使宏继续有效，就不得不编辑代码中的路径。要避免这种情形，可使用相对路径。
工具/原料
OfficeExcel
Excel工作簿相对路径
1、ExcelVBA中工作簿的相对路径可以用ThisWorkbook.Path语句获得。ThisWorkbook是对包含该代码的工作簿的引用。无论该工作簿位于哪里，ThisWorkbook的Path属性都将提供能定位到该工作簿的路径。
Excel工作簿相对路径使用示例
1、Subceshi()DimwkbAsWorkbookDimfi盟敢势袂lenameAsStringDimpath帆歌达缒AsStringfilename="新建MicrosoftOfficeExcel工作表(2).xlsx"path=ThisWorkbook.pathSetwkb=Workbooks.Open(filename:=path&"\"&filename)wkb.Sheets(1).Range("A1")=12EndSub这段代码的背景是，一个文件夹中有两个工作簿文件，一个是含有该段代码的工作簿，另一个是名为新建MicrosoftOfficeExcel工作表(2).xlsx的工作簿，利用path=ThisWorkbook.path获取这两个工作簿的路径，然后打开新建MicrosoftOfficeExcel工作表(2).xlsx工作簿，并为单元格A1赋值为12。