Excel VBA – 基于单元格值检测文件是否存在的function

试图编写一个函数来检测文件(pdf)是否存在。 由于有一些文件/文件夹,我想从单元格值构build文件path。

我到目前为止:

Public Function FileExists(FullpathName As String) As Boolean If Len(Dir(FullpathName)) = 0 Then FileExists = True Else FileExists = False End If End Function 

我正在进入这个单元格:

 =FileExists(A2&B2&A3&" "&A1&" "&C2&".pdf") 

但是当文件肯定在那里的时候它会返回false。 任何人都可以阐明一下我失踪的东西吗?

谢谢!

你的IF条件是倒退的,使用:

 Public Function FileExists(FullpathName As String) As Boolean If Len(Dir(FullpathName)) = 0 Then FileExists = False Else FileExists = True End If End Function