2013-03-04 2 views
1

온라인 어디서나이 답변을 찾을 수 없으므로 여기에 나와 있습니다. MS Access로 Excel 파일을 성공적으로 가져 왔는지 확인하는 방법은 무엇입니까?

나는 엑셀 파일에 끌어와 2007

가 어떻게 파일을 성공적으로 가져 것을 확인할 수 있습니다 MS 액세스에서 테이블에 테이블에 데이터를 입력 코드의 비트? 예를 들어

:

If excel did import Then 
MsgBox "Import successful" 
Else If Excel didnt import 
MsgBox "Import Not successful" 

나는 현재 다음 코드를 사용하여 엑셀 파일을 가져 오전 :

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblData", "FilePath", True, "Sheet1!" 

감사

+1

얼마나 정확하게 가져 오기를 수행하고 있습니까? –

+0

죄송합니다. 코드를 추가하는 것을 잊어 버렸습니다. 코드는 –

답변

5

마지막으로 둘러보고 후있어!

이 코드를 'DoCmd.TransferSpreadsheet'코드 다음에 넣으십시오.

If DBEngine.Errors.Count = 0 Then 

    MsgBox "Imported data successfully!" 

ElseIf DBEngine.Errors.Count > 0 Then 

    MsgBox "The file did not import!" 
    Exit Sub 

End If 
+0

위에 추가되었습니다.이 답변으로 문제가 해결되었지만 전송 명령 앞에 'DBEngine.Errors.Count'가 1 인 것을 발견했습니다. 오류가 발생하지 않았습니다. 그래서 위의 절차를 수정하여 전송 전에 변수를 'DBEngine.Errors.Count'와 동일하게 설정하고 전송 명령 뒤에 DBEngine.Errors.Count가 증가했는지 여부를 테스트했습니다. – geoB

관련 문제