vba怎么判断文件夹是否存在？

VBA中有时要判断文件或文件夹是否存在，为打开文件作准备，这里采用错误机制来嫌早判断

代码如下：

Function 文件或文件夹是否存在(全路径 As String) As Boolean

On Error GoTo

EarlyExit

If Not Dir(全路径, vbDirectory) = vbNullString Then

文件或文件夹是否存在 = True

End If

Exit Function

EarlyExit:

文件或文件夹是否存在 = False

End Function

需在说明的是，参数“全路径”要有盘符之类的，呵呵

使用方法与其它函数一样

VBA的 *** 作中，有时要打开一个文件，但要是文件已打开橘者渗，再次通过程序打开时，会出现错误，因此，在打开文件之前，需在先判断文件是否已打开，下面是判断代码：

Function 文件是否打开(文件名 As

String) As Boolean

On Error Resume Next

文件是否打开 = True

If StrComp(Workbooks(文件名).Name, 文件名, vbTextCompare)  0 Then

文件是否打开 = False

End If

End Function

需要说明的是，参数“文件名”是短文件名（不带路径的文件名）

Function 特殊文件夹路径(文件夹名

As String) As String

Dim WSHShell As Object

Dim lj As String

Set WSHShell =

CreateObject("Wscript.Shell")

lj = WSHShell.SpecialFolders(文件夹名)

Set WSHShell = Nothing

特殊文件圆脊夹路径 = lj

End Function

文件夹名有：

AllUsersDesktop

AllUsersStartMenu

AllUsersPrograms

AllUsersStartup

Desktop

Favorites

Fonts

MyDocuments

NetHood

PrintHood

Programs

Recent

SendTo

StartMenu

Startup

Templates

linux中使用find命令来查找文件夹，使用find

/

-name

要查找的文件夹名

-type

d方式来查找。

find命令说明

语法

find(选项)(参数)

选项

-amin<分钟>：查找在指定时间曾被存取过的文件或目录，单位以分钟计算；

-anewer<参考文件或目录>：查找其存取时间较指定文件或目录的存取时间更接近现在的文件或目录；

-atime<24小时数>：查找在指定时间曾被存取过的文件或目录，单位以24小时计算；

-cmin<分钟>：查找在指定时间之时被更改过的文件或目录；

-cnewer<参考文件或目录>查找其更改时间较指定文件或目录的更改时间更接近现在的文件或目录；

-ctime<24小时数>：查找在指定时间之时被更改的文件或目录，单位以24小时计算；

-daystart：从本日开始计算时间；

-depth：从指定目录下最深层的子目录开始查找；

-expty：寻找文件大小为0

byte的文件，或目录下没有任何子目录或文件的空目录；

-exec<执行指令>：假设find指令的回传值为true，就执行该指令；

-false：将find指令的回传值皆设为false；

-fls<列表文件>：此参数的效果和指定“-ls”参数类似，但会把结果保存为指定的列表文件；

-follow：排除符号连接；

-fprint<列表文件>：此参数的效果和指定“-print”参数类似，但会把结果保存成指定的列表文件；

-fprint0<列表文件>：此参数的效果和指定“-print0”参数类似，但会把结果保存成指定的列表文件；

-fprintf<列表文件><输出格式>：此参数的效果和指定“-printf”参数类似，但会把结果保存成指定的列表文件；销肢

-fstype<文件系统类型>：只寻找该文件系统类型下的文件或目录；

-gid<群组识别码>：查找符合指定之群组识别码的文件或目录；

-group<群组名称>：查找符合指定之群组名称的文件或目录；

-help或——help：在线帮助；

-ilname<范本样式>：此参数的效果和指定“-lname”参数类似，但忽略字符大小写的差别；

-iname<范本样式>：此参数的效果和指定“-name”参数类似，但忽略字符大小写的差别；

-inum<inode编号>：查找符合指定的inode编号的文件或目录；

-ipath<范本样式>：此参数的效果和指定“-path”参数类似，但忽略字符大小写的差别；

-iregex<范本样式>羡搭：此参数的效果和指定“-regexe”参数类似，但忽略字符大小写的差别；

-links<连接数目>：查找符合指定的硬连接数目的文件或目录；

-iname<范本样式>：指定字符串作为寻找符号连接的范本样式；

-ls：假设find指令的回传值为ture，就将文件或目录名称列出到标准输出；

-maxdepth<目录层级>：设置最大目录层级；

-mindepth<目录层级>：设置最小目录层级；

-mmin<分钟>：查找在指定时间曾被更改过的文件或目录，单位以分钟计算；

-mount：此参数的效果和指定“-xdev”相同；

-mtime<24小时数>：查找在指定时间曾被更改过的文件或目录，单位以24小时计算；

-name<范本样式>：指定字符串作为寻找文件或目录的范本样式；

-newer<参考文件或目录>：查找其更改时间较指定文件或目录的更改时间更接近现在的文件或目亏派世录；

-nogroup：找出不属于本地主机群组识别码的文件或目录；

-noleaf：不去考虑目录至少需拥有两个硬连接存在；

-nouser：找出不属于本地主机用户识别码的文件或目录；

-ok<执行指令>：此参数的效果和指定“-exec”类似，但在执行指令之前会先询问用户，若回答“y”或“y”，则放弃执行命令；

-path<范本样式>：指定字符串作为寻找目录的范本样式；

-perm<权限数值>：查找符合指定的权限数值的文件或目录；

-print：假设find指令的回传值为ture，就将文件或目录名称列出到标准输出。格式为每列一个名称，每个名称前皆有“./”字符串；

-print0：假设find指令的回传值为ture，就将文件或目录名称列出到标准输出。格式为全部的名称皆在同一行；

-printf<输出格式>：假设find指令的回传值为ture，就将文件或目录名称列出到标准输出。格式可以自行指定；

-prune：不寻找字符串作为寻找文件或目录的范本样式

-regex<范本样式>：指定字符串作为寻找文件或目录的范本样式；

-size<文件大小>：查找符合指定的文件大小的文件；

-true：将find指令的回传值皆设为true；

-typ<文件类型>：只寻找符合指定的文件类型的文件；

-uid<用户识别码>：查找符合指定的用户识别码的文件或目录；

-used<日数>：查找文件或目录被更改之后在指定时间曾被存取过的文件或目录，单位以日计算；

-user<拥有者名称>：查找符和指定的拥有者名称的文件或目录；

-version或——version：显示版本信息；

-xdev：将范围局限在先行的文件系统中；

-xtype<文件类型>：此参数的效果和指定“-type”参数类似，差别在于它针对符号连接检查。

参数

起始目录：查找文件的起始目录。

示例：

根据文件类型进行搜索

find

.

-type

类型参数

类型参数列表：

f

普通文件

l

符号连接

d

目录

c

字符设备

b

块设备

s

套接字

p

fifo

---