Access VBA "컴파일 오류 : 레이블이 정의되지 않았습니다."

Question

내 동료 중 한 명이 실수로 이전 Access 내보내기 스크립트를 엉망으로 만들었으며 이제 "레이블이 정의되지 않았습니다"오류가 표시되며 Access 전문가에게 가까이 있지 않습니다. 도움이 될 것입니다.

Function Macro2() 
On Error GoTo Macro2_Err 

    DoCmd.TransferText acExportDelim, "golfexport", "ctcexport", "P:\transferdata\golfexport05052017" 
    Exit Function 

Macro2_Err: 
    MsgBox Error$ 
    Resume Macro2_Exit 

End Function 

오류가 노란색으로 강조 표시되고 "Resume Macro2_Exit"줄이 강조 표시됩니다.

누군가를 죽일 가능성이 가장 큰 뚱뚱한 손가락이었습니다.

감사

Answer 1

Resume [Label] 

그 명령이 존재하는 회선 레이블을 필요로 그 실행이 이을 재개 할 수 있습니다. 레이블이 정의되어 있지 않으면 이동할 위치가없고 코드를 컴파일 할 수 없습니다.

그게 모두 절차에 있다면, Resume 명령을 제거하고 하루로 부를 수 있습니다.

Macro2_Exit: 
    Exit Function 
Macro2_Err: 
    MsgBox Err.Description 
    Resume Macro2_Exit 

주 대신 공룡 Error$ 문자열의 Err.Description의 사용 : DoCmd와 Exit Function 사이의 코드가 있다면, 당신은이 레이블을 정의 할 수 있습니다. 그래도 제안.