Re: ファイル名にワイルドカードが使えない
"前村眞一郎" <shin16june@yahoo.co.jp> wrote in message
news:c69mm5$6od$1@localhost.localdomain...
>
> Sub File_Copy()
> Dim myFSO As New FileSystemObject
> myFSO.CopyFile "d:\temp\abc*.csv", "d:\vba_test\test_file.txt"
> End Sub
>
> しかし、実行すると「パスが見つかりません」と怒られます。
>
> 試しにabc20040423.csvのようにファイル名をフルで記述すると思惑通り実行され
ま
> す。
"test_file.txt"はファイル名なのですかそれともフォルダ名なんでしょうか。
abc20040423.csvでうまくいくのは,abc20040423.csvをファイル名test_file.txtで
コピーしているからだと思います。ワイルドカードを使用した場合は,
test_file.txtをフォルダ名と解釈(でないと複数ファイルを同一名で上書きするこ
とになって意味がないためではないかと?)するためで,「パスが見つかりません」
と出るのだと思います。
目的の事がしたいのであれば,いったんフォルダにコピーして,名前変更で拡張子を
".txt"に変更する方法はどうでしょうか。
--
******************************
keizi kounoike
******************************
Fnews-brouse 1.9(20180406) -- by Mizuno, MWE <mwe@ccsf.jp>
GnuPG Key ID = ECC8A735
GnuPG Key fingerprint = 9BE6 B9E9 55A5 A499 CD51 946E 9BDC 7870 ECC8 A735