如何在Excel中用VBA创建文件夹（vba如何在excel中添加一个工作表）

在Excel中用VBA创建文件夹：

1、在excel中创建点击按钮

2、在按钮上写入如下代码：

Sub createDir()

If Dir("F:" & Format(Date, "YYYY-M-D"), vbDirectory) "" Then

MsgBox "文件夹存在"

Else

MsgBox "文件夹不存在!,系统将创建一个名为" & Format(Date, "YYYY-M-D") & "的文件夹"

MkDir "F:" & Format(Date, "YYYY-M-D")

End If

End Sub

3、点击按钮后就会在f盘下创建目录：