Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Macro transferer texte

1 réponse
Avatar
Christian Rolet
bonjour,

je souhaite importer un fichier texte dans une table.

Le nom et le chemin du fichier sont notes dans la macro en dur mais je
voudrais savoir s'il y a une solution pour faire en sorte que ce soit
parametrable. soit une boite de dialogue ou on mettrait le nom et le chemin,
ou mieux un accès a l'explorateur ou on pourrait choisir directement le
fichier.

Merci a tous de votre aide

1 réponse

Avatar
Raymond [mvp]
Bonjour.

tu peux faire tout ce que tu veux mais il vaut mieux passer par du code vba.
sur l'événement clic de ton bouton tu places ce code:

Dim Fichier As String
Fichier = OpenFile("F:mes documents", Mono_Sélection, True, allfiles, ,
True, "*.txt", True)
If Not Nz(Fichier, "") = "" Then
DoCmd.TransferText acImportDelim, , "table1", Fichier, True
End If

changer les noms indiqués avec tes noms réels.

placer la fonction (api) indiquée sur la page :
http://officesystemaccess.seneque.net/apiopenfile.htm
dans un module standard.

Ainsi tu auras avec openfile, l'affichage de l'explorateur standard office.

--
@+
Raymond Access MVP http://OfficeSystemAccess.seneque.net/
http://officesystem.access.over-blog.com/
http://access2007.over-blog.com/
Pour débuter sur le forum: http://www.mpfa.info/


"Christian Rolet" a écrit dans le
message de news:
| bonjour,
|
| je souhaite importer un fichier texte dans une table.
|
| Le nom et le chemin du fichier sont notes dans la macro en dur mais je
| voudrais savoir s'il y a une solution pour faire en sorte que ce soit
| parametrable. soit une boite de dialogue ou on mettrait le nom et le
chemin,
| ou mieux un accès a l'explorateur ou on pourrait choisir directement le
| fichier.
|
| Merci a tous de votre aide
|