前景提要
在上一篇,我们介绍了如何通过一个简单的输入框来创建文件夹的方法,主要是利用了Application.InputBox这个输入框的形式来自主输入文件夹的名字,然后通过MkDir的方法创建文件夹。
但是我们在实际的操作中,可能会碰到一些问题,比方说这个代码不是我用,其他人在使用,而她不小心输入了一些特殊字符,比方说"","/",":"等一些符号,我们都这样这样系统会直接提示文件名中不能存在这样的命名的,会报错的,如果我们将自己的小脚本交给其他人用的话,也会影响体验效果,那么要如何避免这样的情况出现呢?
其实最简单的方法就是,我们在写脚本的时候,要考虑到可能出现的所有问题,做出必要的判断,那么针对上面的问题,我们要如何判断呢?
上代码
If InStr(FileName, ":") Or InStr(FileName, "\") Or InStr(FileName, "/") Or InStr(FileName, "?") Or InStr(FileName, "*") Or InStr(FileName, """") Or InStr(FileName, "|") Then
语法说明
只需要将上述的代码加到创建文件夹就是MkDir的前面,即可
大致的逻辑就是,当输入了filename,即文件名之后,我们在创建之前先判断下这个文件名中是否含有上述的这些特殊字符串,如果有报错,结束程序,如果没有,继续执行后面的创建文件夹的操作
VBA创建文件夹的小技巧,今天你get了吗?