通配符不适用于Excel 15 VBA Dir（）

Question

我一直在尝试做一些非常简单的事情，但是，无论出于何种原因，它都没有用。

我要做的就是使用通配符从特定目录中获取所有.txt文件。

这是我正在使用的完整代码：

Sub RenameFiles()

    'Variables Declaration
    Dim vSpreadsheetPath As String
    Dim vFolderName As String
    Dim vFilesPath As String
    Dim vFile As String
    Dim vRow As Long
    Dim vFilter As String

    'Getting the vFile path
    vSpreadsheetPath = ActiveWorkbook.Path
    vFolderName = "COMBINED FOLDER"
    vFilter = "*.txt"
    vFilesPath = vSpreadsheetPath & Application.PathSeparator & vFolderName & Application.PathSeparator

    vFile = Dir(vFilesPath & vFilter)
    MsgBox (vFile)

End Sub

但是结果没有显示。

最奇怪的是：如果我使用

file = Dir(vFilesPath & "filename.txt")

有用

但是，如果我尝试使用任何通配符（例如下面的通配符），则不会。

file = Dir(vFilesPath & "filename.t*")

对我可能做错的事情有任何想法吗？

Answer 1

这是相关的，你使用的是Mac，因为Mac的不使用通配符，如Windows。

您需要使用其他方法或新的（重新措词）问题，以获取有关使用VBA处理Mac文件系统的更多信息。

这应该可以帮助您入门。

_{（作为OP请求的答复发布。） :-)}