VBA也可以很方便的实现文件操作。本文主要实现当文件夹不存在时,自动创建文件夹的功能。
假设我们要实现的功能是在D盘根目录下创建vbatest文件夹,可以看到,当前文件夹是不存在的:
我们在vb代码编辑器里输入下面的代码:
Sub dir() Dim myDir As String myDir = "D:\vbatest" On Error Resume Next mkdir myDir End Sub
按F5执行,即可成功创建 文件夹,如下图所示:
VBA也可以很方便的实现文件操作。本文主要实现当文件夹不存在时,自动创建文件夹的功能。
假设我们要实现的功能是在D盘根目录下创建vbatest文件夹,可以看到,当前文件夹是不存在的:
我们在vb代码编辑器里输入下面的代码:
Sub dir() Dim myDir As String myDir = "D:\vbatest" On Error Resume Next mkdir myDir End Sub
按F5执行,即可成功创建 文件夹,如下图所示: