フォルダを作成する【MkDirステートメント】【ExcelVBA】

構文

MkDir path As String

MkDirステートメントはフォルダを作成するステートメントです。
引数pathにフルパスで指定しない場合はカレントフォルダにフォルダを作成します。

MkDirステートメントのサンプルコード

Public Sub sample()
    
    '■フォルダを新規で作成する
    MkDir "C:\LOG"
    
    '■省略するとカレントフォルダに作成する
    MkDir "LOG"
    
    '■既に同フォルダがある場合は、実行時エラー '75':パス名が無効です｡
    MkDir "C:\LOG"
    
    '■一度に複数階層のフォルダは作成できない
    '実行時エラー '76':パスが見つかりません｡
    MkDir "C:\LOG\2021\09"
    
End Sub

注意点

• フルパスで指定せず、パスを省略するとカレントフォルダが対象になります。
• 移動先に既にファイルがある場合はエラーが発生します。
  実行時エラー ’58’:既に同名のファイルが存在しています。
• 事前にDir関数でファイルが存在するかどうかチェックした方が望ましいです。

関連記事

• ファイルまたはフォルダを抽出する【Dir関数】【ExcelVBA】
• ファイルをコピーする【FileCopyステートメント】【ExcelVBA】
• ファイルを移動する【Nameステートメント】【ExcelVBA】