在VBA中查找包含〜使用Dir()的隐藏或系统文件

我正在尝试重命名包含非法字符(如#,&,〜等)的一系列SharePoint文件。我修改了此站点中的代码以查找要重命名的文件/文件夹。 当我运行以下命令

strTemp = Dir(strFolder & "*~*", vbHidden) 

(或任何其他属性的事情)我得到的目录中不包含~的文件的巨大列表,但它似乎还没有find一些文件,包含一个初始的~ (如临时文件编辑从未删除的文档)。

那里的任何人都知道如何find这些文件?

道歉张贴这个答案,但我似乎无法添加评论。

ecksc已经回答了他自己的问题,但是我只想指出,你不需要用数字6replace常量。要组合属性,可以使用+来添加它们,例如:

 strTemp = Dir(strFolder & "*~*", vbHidden + vbSystem)