关闭工作簿VBA中的引用单元格（带有错误检查和相对路径）

我打算改写这篇文章，因为它很糟糕

下面是我从stackoverflow获得的一些代码，用于从封闭工作簿中的单元格获取数据，它工作得非常完美

子PullValue（） 尺寸路径、文件名、图纸名称、单元格

PATH = "C:\Users\admin\Desktop\"
FILENAME = "Book1.xlsm"
SHEETNAME = "Sheet1"
CELL = "A1"

With Range("A2")
    .Formula = "='" & PATH & "[" & FILENAME & "]" & SHEETNAME & "'!" & CELL & ""
    .Value = .Value
End With

端接头

不过。我试图用相对链接替换路径“C:…”。我尝试过很多表单，例如“ThisWorkbook.Path”，但似乎都不起作用，所以我显然添加了错误的代码，因为我不是真正的VBA用户

如果有人有任何提示，将不胜感激，如果你能告诉我如何忽略错误，将获得额外的积分。如果SHEETNAME不存在，我希望单元格返回空白

干杯

---

：）

我看不出它不起作用的原因，但是，您还记得在

这个工作簿之后添加另一个“\”吗？您所说的相对路径实际上是什么意思？
间接引用要求打开引用的工作簿。谢谢。就这样。最后一行是Path=thiswoolk.Path&“\”，这是相对路径，我指的是当前文件夹，而不是根目录。现在我只需要找出如何忽略任何错误捕获错误，您可以在这里阅读：