'我来回答
'你想打开的是相对路径
'复制下面的代码
Sub AA()
Dim path As String, n As Long
path = ThisWorkbook.path
n = UBound(Split(path, "\"))
Workbooks.Open Replace(path, Split(path, "\")(n), "C\F.xlsX")
End Sub
'把此代码放在B文件夹 E工作簿内
'可以打开 C文件夹 F工作簿
'本机测试 通过
'严禁抄袭 初涉江湖OOO
温馨提示:答案为网友推荐,仅供参考