MSG : Echec des enregistrements des corrections automatiques de noms : table

[lbar012001]

bonjour
j'ai créé une fonction d'importation type transferspreadsheet de données issues d'un fichier excel vers une table access
tout s'importe bien

'Récupération du Folder de l'application
f = DLookup("[APPLI_FOLDER]", "[T_FOLDER]")
 
'Vérification de l'existence du fichier Stock.xls
If FichierExiste(f & "stock.xls") = False Then
    Me.LS1.BackColor = vbRed
    info = MsgBox("Import file stock.xls not found", vbCritical, "STOCK import")
    Exit Sub
End If
 
'Import nouveau stock ex XLS
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "T_STOCK_TMP", f & "stock.xls", True

je n'ai pas de message d'erreur, toutes les données sont bien là


par contre à la fin de l'importation, j'ai une table qui se génère automatiquement et je ne comprends pas comment éviter cela, elle comporte une ligne de données ainsi :

Nom de l'objet* Type d'objet Raison de l'échec Temps
T_STOCK_TMP Table Impossible d'enregistrer l'objet 05/09/2008 15:20:07

si vous avez une idée..
merci
laurent