フィルタを除外するファイルダイアログ（Excel VBA）

Question

現在、Excel用の小さなスクリプトを作成して、csvファイルをインポートしています。したがって、開いたファイルダイアログをcsvフィルタに統合しました。

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 

これまでのところ、これはうまく動作します。しかし残念ながら、私は

• file.csvになり
• のtest.CSVのように、CSVファイルの種類を持っている
• file_1.csv
• lala_2.csv
• ...

この方法でフィルタを修正できますか？彼は '.csv'の前に '_＃'がないファイルのみ表示しますか？

ありがとうございました。 お祈り申し上げます

ステファン

Answer 1

残念ながら、あなたは非常にここに限定されているのみワイルドカード文字を除外することはできません*と?を使用することができます。

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ファイルを取得するにはそれはあなたができる最善だ：

あなたは、このようなフィルタを持つことができます。

マイクロソフトのウェブサイトのdocを参照してください。