2016 - 2024

感恩一路有你

vba新建文件夹并命名 VBA怎么新建文件夹?

浏览量:2754 时间:2021-03-17 20:59:27 作者:admin

VBA怎么新建文件夹?

方法/步骤1方法1:使用VBA的MkDir语句创建文件夹。代码如下:Sub xyf()On Error Resume NextVBA.MkDir ("c:/例子")End Sub其中 VBA.MkDir ("c:/例子")表示在C盘创建一个名为“例子”的文件夹On Error Resume Next语句表示如果已经有这个文件夹,则不创建。如下图所示:2方法2:使用FileSystemObject对象的CreateFolder方法。代码如下:Sub xyf()On Error Resume NextDim oFsoSet oFso = CreateObject("Scripting.FileSystemObject")oFso.CreateFolder ("C:/例子")End Sub其中 oFso.CreateFolder ("C:/例子")表示在C盘创建一个名为“例子”的文件夹On Error Resume Next语句表示如果已经有这个文件夹,则不创建。如下图所示:

如何在Excel中用VBA创建文件夹?

在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盘下创建目录:

vba新建文件夹并命名 vba复制文件到另一个文件夹 vba将文件另存为指定文件夹

版权声明:本文内容由互联网用户自发贡献,本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。