在PC上工作的路径，但不是Mac

Question

我的Mac计算机上的VBA代码出现问题。它在Windows上运行良好。我知道它与指定目录有关，但我不确定正确的语法 工作簿位于一个文件夹中，然后我想指定另一个与工作簿位于同一文件夹中的文件夹（Datatextfiles）。

'Change Path
Dim strPath As String
Dim MyDir As String
MyDir = ActiveWorkbook.Path
strPath = MyDir & "/Datatextfiles/"

Dim strExtension As String

 'Stop Screen Flickering
Application.ScreenUpdating = Falsew

 'Change extension
strExtension = Dir(strPath & "*.txt")

clearData

Do While strExtension <> ""

Answer 1

你们都是对的。 mac上文件夹分隔符的正确名称是冒号'：'，例如

ChDir "KathyStringHD:Library:WebServer:Documents:DispatchReports:InTime:"

Answer 2

我认为您在Mac上遇到问题，因为您没有为路径使用mac路径分隔符。

尝试以下代码行：

strPath = MyDir & Application.PathSeparator & Datatextfiles & Application.PathSeparator