' Return True if a file existsFunction FileExists(FileName As String) As Boolean On Error GoTo ErrorHandler ' get the attributes and ensure that it isn't a directory FileExists = (GetAttr(FileName) And vbDirectory) = 0ErrorHandler: ' if an error occurs, this function returns FalseEnd Function
![VP Climate](https://www.devx.com/wp-content/uploads/VP-Climate-300x171.jpg)
![VP Climate](https://www.devx.com/wp-content/uploads/VP-Climate-300x171.jpg)