ファイルオブジェクト 2019.09.042025.01.04 A ファイルオブジェクト生成 Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject")
