vba를 사용하여 파일을 열려고 할 때 오류가 발생하지 않도록하십시오.

Question

정말 간단한 질문 인 것처럼 보이지만 답변이 있는지 확실하지 않습니다.

Sharepoint에서 파일을 여는 데 VBA 코드를 사용하고 있지만 Len (Dir())을 사용하여 파일이 실제로 존재하는지 확인할 수 없으므로 포럼에서 찾은 코드를 사용했지만 이 코드는 내가 생각했던대로 작동하지 않습니다.

Sharepoint에서 여러 파일을 찾고 각 파일에 현재 날짜가 있어야하는 코드가 필요했습니다 (예 : 2014 년 7 월 인 경우 파일의 이름은 Name_July2014가 아니고 Name_June2014 또는 May_2014가되어야 함).). 현재 날짜가있는 파일이 존재하지 않을 수 있으므로 사용중인 통합 문서의 특정 셀에 "Not Updated"메시지가 입력되어 매크로가 계속 실행됩니다. 코드는 제대로 작동하지만 파일이 존재하지 않는다는 메시지를 표시 할 때마다 중지됩니다. 이 메시지는 매크로가 존재하지 않는 파일을 열려고 할 때마다 나타납니다. 이 경고를 건너 뛰고 코드를 실행시켜야했습니다. 나는이 코드가 경고를 무시할 것이라고 생각했다. (On Error GoTo를 사용한다.) 이것은 파일이 존재 함을 보여줄 수있는 방법이지만 작동하지 않는다. 누구든지 살펴볼 수 있습니까?

"인터넷 주소가 ... 유효하지 않습니다"라는 메시지가 표시되지 않도록 할 수 있습니까?

영어로 미안하지만 미안하지만이 질문이 이미 다른 게시물에서 응답 된 경우 죄송합니다.

이 같은 코드가 모습입니다 :

'Open the file and checks if the name of the file opened is different from the  
'previous file opened 
On Error Resume Next 
Application.Workbooks.Open (fileName) 
newBook = ActiveWorkbook.Name 
If originalBook = newBook Then 
    [the file does not exist, do something] 
Else 
    [the file exists, do something else] 
End If 
On Error Goto 

Answer 1

On Error Resume Next 엑셀에서 오류가 발생하는 경우, 그것을 무시하고 코드의 다음 줄로 이동 그렇게한다. On Error GoTo 0 정상적인 오류 처리를 다시 켭니다. On Error GoTo은 잘못된 구문이며 실행되지 않습니다. 아마도 그 오류가있는 곳일 것입니다. 나는이 두 가지 문제, 인터넷 파일 주소가 유효하지 않음을 먼저 메시지를 받았습니다

Why would you ever use "On Error Goto 0"?