Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject") ファイルオブジェクト
タイトルとURLをコピーしました
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")