使用排除filter打开文件对话框（Excel VBA）
我目前正在为Excel导入csv文件编写一个小脚本。 因此我将一个打开的文件对话框与一个csv-filter集成在一起。
With Application.FileDialog(msoFileDialogFilePicker) .AllowMultiSelect = True .Title = "Datei wählen" .InitialFileName = "c:\test\*.csv" .Show If .SelectedItems.Count > 0 Then 'do something End If End With 到目前为止，这对我来说很好。 但不幸的是，我有不同types的CSV文件
- FILE.CSV
- test.csv
- file_1.csv
- lala_2.csv
- …
我可以用这种方式修改我的filter，他只显示“.csv”前没有'_＃'的文件吗？
谢谢你的帮助。 最好的祝愿
斯特凡
不幸的是，你在这里非常有限，只能使用通配符*和? 不允许排除字符。
你可以有这样的filter：
With Application.FileDialog(msoFileDialogFilePicker) .AllowMultiSelect = True .Title = "Datei wählen" .InitialFileName = "c:\test\test_*.csv" .Show If .SelectedItems.Count > 0 Then 'do something End If End With
要检索以test_开头的所有CSV文件，但这是您所能做的最好的。
请参阅微软网站上的文档 。