history
Egyptian Pharaoh
- Local time
- Today, 06:10
- Joined
- Jan 26, 2008
- Messages
- 190
Hello Friends,
Please I would like to ask about the meaning of the following CODE
Please I would like to ask about the meaning of the following CODE
Code:
Private Sub Command 12_Click()
On Error GoTo errsub 'Resume Next
DoCmd.RunSQL "DELETE excel.*FROM excell;"
DoCmd.TransferSpreadsheet acImport, 8, "excel", "C:\Book.xls", False, "A1:E7"
MsgBox "All fields have been Imported [excel]"
errsub:
If Err.Number = 3011 Then
MsgBox "[C:\Book.xls]The Excel file path is not right ", 64,
"Duplicate Backup Name"
End If
End Sub