Excel VBA - ファイル名が部分的に一致する場合、ハイパーリンクを生成する - TechRepublic

Excel VBA - ファイル名が部分的に一致する場合、ハイパーリンクを生成する

ウィザードの皆さん、

Excel スプレッドシートの場合:
A3 には、C:\Users\Auser\Documents\FolderA\ のようなフォルダへのパスがあります。
セル A6 以下に、セルごとに 00K12345 のような値のリストがあります。

A3 のパスのフォルダーには、次のような名前のファイルがあります: 12 201**002 ABC123 00K12345.PDF

必要事項: B6以下の対応するセルで、
Aの値がA3フォルダ内のファイルの1つに見つかった場合は、
Aの値をフレンドリ名としてそのファイルへのハイパーリンクを生成します。
それ以外の場合は、「見つかりません」と入力します。

これまでのところ、リンクが有効な場合に true/false を返す以下のコードしかありませんが、明らかにこれではうまくいきません。

コード:
Function HLinkTrueFalse(path As String) As Boolean
If Dir(path) <> vbNullString Then HLinkTrueFalse = True
End Function