Discussion :

[maestro_972]

Bonjour,

J'ai un fichier csv que je reçoit avec la date de modification du fichier suffixer ds le nom du fichier.
ex :fichier_20090801

j'importe ce fichier dans une table access, mais ce que je voudrais, c'est avoir un champs avec la date de modification (20090801 en format date).

savez vous si cette opération et possible et bien sur comment la réaliser

Merci d'avance.

[jj4822]

Bonjour.

Le code ci-dessous permet de recuperer le nom de fichier present sur un repertoire et de recuperer la valeur d'une partie du nom de fichier.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
dim valeur as string
répertoire = Dir("C:\.......\fichier_*.csv", vbDirectory)
    Do While répertoire <> ""
        'recuperation de la valeur partielle dans le nom de fichier
        valeur= left(right(répertoire,12),8)
        'transfo en format date
        valeur=right(valeur,2)&"/"&left(right(valeur,4),2)&"/"&left(valeur,4)
        répertoire = Dir
    Loop

Il suffit de rajouter, dans le champ date de la table le contenu de "valeur".

Attention : il faut absolument qu'il y ait un seul fichier dont le nom soit "fichier*.csv" dans le repertoire. Sinon, tous les fichiers present seront pris en compte et, vraisemblablement, le nom du dernier fichier repertorie dans le repertoire sera pris en compte. Ce ne sera pas forcement le bon fichier.

Cdlt

[DUCKY_]

Bonjour !

Plutôt que de re-poster je vais poser ma question ici !

Je souhaiterais faire quelquechose dans le même style

Nom du fichier: FR_USD_VELO.xls

Mon problème avec le code proposé est que moi il a toute une liste de fichier excel comme celui-là avec des noms différents, et je voudrais qu'a chaque fichier ajouté, un enregistrement apparaisse avec Pays : France , Devise ; USD , Produit : VELO

Est-ce possible ?

Je ne veux pas forcement un truc tout pondu si ça vous gène, je suis près à chercher

Cordialement,

DUCKY_

[pier.antoine]

Bonjour.

A première vue, c'est assez semblable :

A partir du nom de fichier, récupérer les 3 valeurs voulue avec les fonctions du format String (Right, Left, mid... chercehr dans l'aide).

Pierre

PS : il vaut mieux créer une nouvelle discussion, quitte à mettre en lien la discussion que vous voulez indiquer.