エクセル VBA ：FileSerchについて教えて下さい。

質問

エクセルVBAのfileserchで、ファイルの種類を選ばないといけませんが、このとき「不明なファイル」を指定したいです。そのやり方を教えてください。しかし、私がやってみたところ無理でしたので他のやり方でも結構です。教えて下さい。簡単にその目的を下に記しています。

目的：あるフォルダにある「不明なファイル」に拡張子「.txt」をつけてテキストファイルにする。
↓
そのため、フォルダ内の全ての「不明なファイル」を取得したい。

回答No.1

popesyu · ベストアンサー

不明なファイルというのは拡張子がないファイルということで宜しいのでしょうか？　それとも関連付けがされていないファイルのことでしょうかね。

もし前者ならファイル名に"."があるかどうかで判別するしかないでしょう。
http://www.asahi-net.or.jp/~zn3y-ngi/YNxv913.html

後者なら...APIを叩いて確認するしかないかと。かなり面倒そうですが。そのものずばりなサンプルがありました。
http://hp.vector.co.jp/authors/VA015367/vba/exesta.htm

どちらにせよfileserchではお望みの検索できませんので使えません。もちろんfileserchで全て取得して一つ一つチェックするという方法もありですが、最初から一つ一つチェックしていっても同じことですし。