目录功能在Excel 2011 for Mac中不起作用

Question

我正在学习VBA，我被困在以下代码中：

1 Sub openwb()
2 Dim myfile As String, mypath As String
3 mypath = "SolidHD:Users:ls:Desktop:untitled:"
4 myfile = Dir(mypath & "*.xls*")
5 Do While myfile <> ""
6 Workbooks.Open "mypath & myfile"
7 myfile = Dir()
8 Loop
9 End Sub

我收到以下错误：运行时错误68设备不可用。调试功能突出显示第4行。 我在互联网上搜索没有快乐......这非常令人沮丧......我无法理解什么是错的。