VBAでテキストファイルを作る その2(ファイル取得)

前回設定したFSO(File System Object)を使用してファイルを取得するマクロを作成．

【事例】
sub fso_file_create()
Dim fso As New FileSystemObject
Dim fso_create As File
Set fso_create = fso.Getfile("C:\temp\test.xls") 　'fso_createにtest.xlsファイルを格納
fso_create.move ("C:\test\test.xls") 'testフォルダにファイルを移動
End Sub

【注意】
指定したファイルが存在しない場合，エラーが発生するので注意が必要．

今日は，こんなもんで…