3

特定のフォルダー内のすべての Excel ファイルを処理しています

Dim dirInfo As New DirectoryInfo(spreadsheetFolder)
excelFiles = dirInfo.GetFiles("*.xlsx")

このフォルダに「~$weird.xlsx」ファイルが表示されることがありますが、これらのファイルには興味がなく、スキップしたいと思います。

非表示のファイルをスキップしたいのですが。ここでの問題は、fileinfo.attributes に隠し属性が含まれているだけでなく、

Hidden Or Archive Or NotContentIndexed {8226}

私がネット上で見つけたコードは、hidden 属性が唯一の属性である場合にのみ機能します。他の属性もある場合はどうすればよいですか?

「~$」で始まるものはすべて無視できることはわかっていますが、それは楽しくなく、この問題が今私を悩ませています!

みんなありがとう

4

1 に答える 1