2017-12-06 1 views
0

내가 폴더 위치에있는 기존 파일을 찾기 위해 노력하고

는 현재 코드 :

Dim FileExistsbol As Boolean 
Dim stFileName As String 
stFileName = "H:\Test File.txt" 
stFileName = Trim(stFileName) 
FileExistsbol = dir(stFileName) <> vbNullString 
If FileExistsbol Then Kill stFileName 

오류 :

오류 메시지는 : 유형 불일치 이 줄의 VBA 디버그 :

FileExistsbol = dir(stFileName) <> vbNullString 

파일이 존재하므로 해결 방법을 모를 경우 - 어떤 아이디어입니까?

나는 FileExistsbol 변수를 제거하고 단지 같은 것을 할 얻을 것

답변

1

:

If Dir(stFileName) <> "" Then 
    Kill stFileName 
End If 
관련 문제