VBA 2007 Filedialog添加filter

我正在使用Access 2007并试图通过使用filter筛选FileDialog文件列表。 在debugging时，代码在.Filters.Add行上返回错误：运行时错误“5”：无效的过程调用或参数。 我搜刮了StackOverflow和微软。 .Add方法似乎是正确的。

Dim fn As Object Set fn = Application.FileDialog(3) With fn .InitialFileName = "C:\BillData\" .Title = "Select input file" .Filters.Clear .Filters.Add "Bill Files", "ccc.*" .AllowMultiSelect = False .InitialView = msoFileDialogViewDetails End With 

如果我跳过这一行代码，其他的一切似乎都正常。 你的帮助将不胜感激。

Answer 1

假设你正在寻找诸如“test.ccc”或“myresource.ccc”的文件，你的filter应该是“* .ccc”。 如果你真的有一堆文件命名只是ccc不同的文件types，如“ccc.txt”，“ccc.jpg”“ccc.doc”等，你需要通过InitialFileName 像这样筛选。