1

似乎在网上的任何地方都找不到这个答案，所以我们开始吧。

我有一些代码可以提取一个 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!"

谢谢

4

1 回答 1

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
于 2013-03-04T13:38:58.240 回答