Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 14/12/2010, 17h27   #1
Invité de passage
 
Inscription : novembre 2010
Messages : 17
Détails du profil
Informations forums :
Inscription : novembre 2010
Messages : 17
Points : 0
Points : 0
Par défaut Importation fichier, récupération de la date dans le nom de celui-ci

Bonjour,

Je voudrais savoir s'il est possible d'importer un fichier .csv dans une table, de l'envoyer dans une table, et de rajouter un champ DATE qui récupère la date dans le nom du fichier.

Merci d'avance pour votre aide.

Cordialement,
Antoine S.
a.saussois est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 14/12/2010, 17h31   #2
Rédacteur/Modérateur
 
Avatar de jpcheck
 
Jean-Philippe ANDRÉ
Inscription : juillet 2007
Messages : 7 863
Détails du profil
Informations personnelles :
Nom : Jean-Philippe ANDRÉ
Âge : 28
Localisation : France

Informations forums :
Inscription : juillet 2007
Messages : 7 863
Points : 10 743
Points : 10 743
Envoyer un message via MSN à jpcheck
salut,

as-tu la nomenclature du nommage du fichier?

Exemple :
Monfichier20101214.csv
__________________
Pas de question technique par MP, je ne réponds pas

Mon perso ? Une vraie brute

Tutos Access, Tâches planifiées et Batch,Tables de Paramètres sous Access, Excel et Batch, Tâches planifiées et Access
jpcheck est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 14/12/2010, 17h34   #3
Invité de passage
 
Inscription : novembre 2010
Messages : 17
Détails du profil
Informations forums :
Inscription : novembre 2010
Messages : 17
Points : 0
Points : 0
Bonsoir jpcheck,

Oui je l'ai : stats_2010-11-20.csv

Antoine.
a.saussois est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 14/12/2010, 17h50   #4
Membre confirmé
 
Avatar de spaiku
 
Chef de projet MOA
Inscription : septembre 2007
Messages : 191
Détails du profil
Informations personnelles :
Âge : 32
Localisation : France, Paris (Île de France)

Informations professionnelles :
Activité : Chef de projet MOA
Secteur : Arts - Culture

Informations forums :
Inscription : septembre 2007
Messages : 191
Points : 250
Points : 250
Bonjour,

avec cette nomenclature, tu peux utiliser la fonction mid pour saucissoner le titre du fichier et récupérer les fragments de date.

Tu peux aussi utiliser un objet File (référence Microsoft Scripting Runtime nécessaire) et avoir accès aux dates de création, de dernier accès et de dernière modif via les propriétés idoines.
spaiku est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 14/12/2010, 17h53   #5
Invité de passage
 
Inscription : novembre 2010
Messages : 17
Détails du profil
Informations forums :
Inscription : novembre 2010
Messages : 17
Points : 0
Points : 0
Merci je vais essayé !!

Antoine.
a.saussois est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/12/2010, 09h21   #6
Membre confirmé
 
Jacques Lesueur
Inscription : mai 2006
Messages : 180
Détails du profil
Informations personnelles :
Nom : Jacques Lesueur

Informations forums :
Inscription : mai 2006
Messages : 180
Points : 209
Points : 209
bonjour,
une autre manière, fonction replace
Code :
1
2
3
4
5
Sub Test
  dim a$, convertDate as date
  a$ = "stats_2010-11-10.csv"
  convertDate = cdate(replace(replace(a$,"stats_",""),".csv",""))
end sub
Jack78960 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 01h51.


 
 
 
 
Partenaires

Hébergement Web