vba宏中找不到文件错误

Question

我在openxlsx中使用R库生成了大约150个excel文件。由于它们包含一堆公式，因此在我可以解析它们以读取数据之前，需要打开并保存每个公式。我创建了一个宏来打开，保存和关闭excel文件。宏如下：

Sub Macro1()
Path = "/Users/ytk/Desktop/2016-11-30/"
Filename = Dir(Path & "*.xlsx")
  Do While Filename <> ""
  Workbooks.Open Filename:=Path & Filename
       Workbooks(Filename).Close SaveChanges:=True

  Loop
End Sub

然而，我一直在：

Run-time error '53':

File not found

我做错了什么？这是正确的文件路径。我在Mac，Excel 2016上运行它。

修改：我找到了this thread，并将路径分隔符更改为:而不是/：

Path = "Users:ytk:Desktop:2016-11-30:"

我仍然遇到同样的错误。