如何驗證Excel文件已成功導入MS Access？

似乎無法在網上找到這個答案，所以在這裏我們去。如何驗證Excel文件已成功導入MS Access？

我有一些代碼，拉一個Excel文件，它的數據輸入到一個表到MS Access中的表2007

我如何可以驗證該文件已成功導入？

例如：

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

我目前使用下面的代碼導入Excel文件：

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

感謝

來源

2013-03-04 Anton Hughes

您究竟如何在Access中執行導入？ – 2013-03-04 12:27:13

對不起，我忘了補充一點，代碼上面加了 – 2013-03-04 13:18:03

終於得到它環顧四周後！

將此代碼放在'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

來源

2013-03-04 13:38:58

雖然這個答案解決了一個問題，我發現'DBEngine.Errors.Count'在傳輸命令前是1。沒有錯誤被觸發。所以我修改了上面的過程，在傳輸之前設置了一個等於'DBEngine.Errors.Count'的變量，並測試了傳輸命令後是否增加了'DBEngine.Errors.Count'。 – geoB 2014-05-02 21:58:51

如何驗證Excel文件已成功導入MS Access？

回答

相關問題