VBA Dialogue阻止用户更改扩展名FileFilter选项

Question

假设我有一个包含多种文件类型的目录，并且我已将文件过滤器设置为仅显示CSV文件

paths = Application.GetOpenFilename("Comma Separated Values (*.csv),*.csv", _
MultiSelect:=True)

上面的代码确实正确应用了过滤器。

现在，当我在文件名编辑框中放置任何过滤器文本并点击打开/输入时，文件扩展名过滤器将不再工作/重置为用户的过滤器。

这意味着如果我在同一目录中有test.doc和test.csv的文件，并在打开文件对话框编辑框中键入test*，则Word文档和CSV文件都将显示为可选择。

这是一个错误，有没有办法解决这个问题？也就是说，我希望用户定义的过滤器是对预定义过滤器的补充。

Answer 1

我想我明白你在问什么。我知道我有一个人躺在某个地方。

这没有多选：

fileOpen = Application.GetOpenFilename("Text Files (*.csv),*.csv,Word Files (*.doc),*.doc")

这是Muti select plus title：

fileOpen = Application.GetOpenFilename("Text Files (*.csv),*.csv,Word Files (*.doc),*.doc", 1, "Pick Your CSV File", , True)

希望有所帮助！