파일이 존재하는지 확인

다음 코드는 파일이 존재하는지 확인하는 간단한 사용자 정의 함수입니다.

Function FileExists(FPath As String) As Boolean

    Dim FName As String

    FName = Dir(FPath)

    If FName <> "" Then
        FileExists = True
    Else
        FileExists = False
    End If
    
End Function