VBAのDir関数でワイルドカードを使用した時の挙動について

###質問内容
エクセルのマクロから別のエクセルを開く際にファイル名を部分一致検索で取得したかったのですが、
Dir関数にワイルドカードを使用した時の挙動がなぜそうなるのか分からなかったのでご教授お願いします。

###事象・再現手順
１．任意のフォルダに"あいうえお.xlsx"という名前のファイルを作成する。
２．１のフォルダのパスをA1のセルに記入し、下記マクロを実行する。
３．fileNameが取得できない。

Sub test()

Dim path As String
Dim fileName As String

path = Sheets(1).Range("A1").Value
fileName = Dir(path & "*あいうえ*.xls")

End Sub

４．fileName = Dir(path & "あいうえ.xls")の部分を下記に変更し、実行する。
５．fileNameが取得できる。

fileName = Dir(path & "*あいう*.xls")

###試したこと
fileName = Dir(path & "あいうえ.xls")　→　取得できない
fileName = Dir(path & "あいう.xls")　　→　取得できる
fileName = Dir(path & "いうえ.xls")　　→　取得できない
fileName = Dir(path & "いう.xls")　　　→　取得できる
fileName = Dir(path & "あいうえ.xlsx") →　取得できる　

###補足情報(言語/FW/ツール等のバージョンなど)
Excel2010

拡張子をxlsxで検索することで実装はできた（ほかのパターンも基本的に取得可能）のですが、同じような記述で何故挙動に差異が生まれるのか分からなかったのでご教授お願いします。

行動規範の内容に同意します

回答2件

ベストアンサー

拡張子が３文字の場合、8.3形式ファイル名のみ

そんなことは無いでしょう。ロングネーム、ショートネームの両方にヒットします。
ヒットしないのは拡張子が"xls"であるロングネームのファイルがないだけでは？

ロングネームとショートネーム両方にヒットするのは、ほとんどのコマンドでそうじゃないでしょうか？

コマンドプロンプトでそのフォルダーを開いて、dir /xというコマンドを入れると、ロングネーム、ショートネームの両方が表示されるので、どう書けば何にヒットするのかが分かると思います。

投稿2017/09/30 01:17

otn

総合スコア86281

8524ba23

2017/09/30 03:55

「あいうえお.xls」での確認を怠っており、誤った解釈で回答していました。ご指摘ありがとうございました。

tanaka1202

2017/10/02 01:34

ありがとうございます。

行動規範の内容に同意します

回答修正

以前の回答において

Directory.GetFiles メソッド

アスタリスクのワイルドカード文字を使用する場合、 searchPattern 「*.txt」など、指定した拡張子の文字数影響を与えます検索次ようにします。

指定された拡張機能が 3 文字の場合は、指定した拡張子が始まる拡張子を持つファイルを返します。たとえば、「*.xls」には、"book.xls"と"book.xlsx"両方が返されます。

から、Dir関数においても*あいう*.xlsからあいうえお.xlsとあいうえお.xlsxが取得できると解釈していましたが誤解でした。Dirはそのような挙動はとりません。

.xls、.xlsx、.xlsmなどを取得したい場合は、～.xls*とすればよいです。

以下の回答（拡張子が３文字の場合、8.3形式ファイル名のみが検索対象）が誤りであることは、*あいうえ*.xlsであいうえお.xlsが取得できることから確認できました。

以下、以前の回答（誤り）

過去質問System.IO.Directory.GetFiles の挙動についてと同じく8.3形式ファイル名が原因だと思われます。

Dir 関数に明記されていないので推測ですが、検索文字列において

拡張子が３文字の場合、8.3形式ファイル名のみ
拡張子が３文字を超える場合、通常の（長い）ファイル名も

検索対象としていると思われます。

今回の例あいうえお.xlsxはあいう~1.XLSとなりますが、上記の規則に当てはめると提示例のようになりえます。

投稿2017/09/29 07:39

編集2017/09/30 03:52

8524ba23

総合スコア38352

sazi

2017/09/29 08:34

興味があって検証してみたので、コメントします。 Dir *XXX*.xls でヒットしないのを確認した上で、拡張子部分を「.xls?」や「.xls*」として実行したところ、果たしてヒットしました。よって、Dir関数が拡張子部分で制御しているというのは正しそうです。だけど、両方見ろよと言いたいところですけどね。