構文
Object.CreateFolder( FolderName )
FolderName・・・・作成するフォルダのパスを指定。
CreateFolderで新規でフォルダを作成します。
CreateFolderメソッドのサンプルコード
Public Sub sample() '■FileSystemObjectの宣言 Dim fso As Object: Set fso = CreateObject("Scripting.FileSystemObject") '■"C:\sample1"をフォルダ生成する fso.CreateFolder "C:\sample1" '■"C:\sample2"をフォルダ生成する fso.CreateFolder "C:\sample2\" '最後が円マークでも生成する End Sub
注意点
- 既にフォルダがが存在していければエラー発生します。FolderExistsで事前確認必要です。
実行時エラー58「既に同名のファイルが存在します」
コメント