自分なりに考えて↓のを作ってみたのですが動きません。何がいけないのでしょうか・・・。Set tori = CreateObject("Scripting.FileSystemObject")If tori.FolderExists = False Thentori.CreateFolder End If