Bonjour merci
Tout d'abord mercià vous deux , mais cependant
--> Pour Arkham46 1-/ Le modèle est enregistré dans une table système MSysIMEXSpecs ?? de manière permanente dans la base pour pouvoir être utilisé dans la commande DoCmd.transfertText. Un peu technique pour moi que faut-il faire car j'ai essayé et j'ai pas capté?
--> Pour JOCHMANS
2-/ J'ai une methode simple qui marche pour importer un fichier excel qui marche très bien maintenant je passe sur un format .txt pour importer de manière auto en vba je n'arrive que dois-je faire dans mon code pour que cela fonctionne ? déclarer un variable spécifique pour un fichier .txt pour déclancher la
DoCmd.TransferText acImportDelim, "NomModel", "TableDestination", "FichierSource"
car cela correspondrai à mon besoin, je veux faire simple un click puis = un import dans une table comme je fais pour excel.
voici mon modèle qui marche sur excel :
Dans mon formulaire :
1 2 3 4 5 6 7 8 9
| Private Sub TestImportExcel___Click___Click()
Dim varFeuilles As Variant
varFeuilles = Array("ma feuille")
ImportExcel "C:\fichier", _
varFeuilles, True, "ma feuille"
End Sub |
Dans mon module :
1 2 3 4 5
| For Each strFeuille In varFeuilles
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, _
strTable, strChemin, blnNoms, strFeuille & "!"
Next |
Comment puis-je l'adapter à mon cas cette fois ci en .txt ?
Partager