IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

importer un fichier excel csv [AC-2007]


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Inscrit en
    Juillet 2009
    Messages
    23
    Détails du profil
    Informations forums :
    Inscription : Juillet 2009
    Messages : 23
    Par défaut importer un fichier excel csv
    Bonjour

    le code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.TransferText acImportDelim, , "NomTable", "Fichier csv", False
    marche tres bien sous access 2003 mais sous access 2007 il met tout ds une colonne F1
    Quel est le bon code pour avoir touts ds différentes colonnes de la table access

    Merci

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour

    Lorsque j'utilise ce genre de méthode je crée toujours un filtre d'importation pour être sur de ce que je fais, il s'agit du deuxième paramètre de ta commande.

    Je ne sais pas si tu sais le faire, donc quelques informations.

    Onglet Données Externes
    Groupe Importer puis Fichier Texte
    Sélectionne ton fichier et lance l'import
    Dans la fenêtre qui s'affiche tu fais Suivant, si tes données sont bien séparées c'est ok.
    Tu cliques sur le bouton "Avancé" en bas de la fenêtre
    Là tu fais "enregistrer sous", tu mets un nom que tu notes.
    Ensuite tu mets ce nom dans ta commande, ce qui peut donner quelque chose de ce style.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.TransferText acImportDelim, "Classeur1 Spécification d'importation", "table1", "C:\Users\Philippe\Desktop\classeur1.csv", False
    Philippe

  3. #3
    Membre averti
    Inscrit en
    Juillet 2009
    Messages
    23
    Détails du profil
    Informations forums :
    Inscription : Juillet 2009
    Messages : 23
    Par défaut je ne trouve pas le code
    bonjour,
    Merci pour votre réponse
    Cela marche très bien par les menus mais il me faut le code vba.
    En effet je dois importer plusieurs fichiers

    voila mon code

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     'boucle tant que le répertoire n'a pas été entièrement parcouru
        Do While (rep <> "")
            'teste si c'est un fichier ou un répertoire
            If (GetAttr(Chemin & rep) And vbDirectory) = vbDirectory Then
     
            Else ' C'est un fichier
                     DoCmd.TransferText acImportDelim, , "Monitoring", Chemin & rep, False
              i = i + 1
            End If
            rep = Dir
        Loop
    en version 2003 c'est OK , il doit me manquer un paramètre mais lequel ?

    Merci
    Aeef

  4. #4
    Invité
    Invité(e)
    Par défaut
    Re

    Citation Envoyé par Aeefred Voir le message
    il doit me manquer un paramètre mais lequel ?
    As-tu lu ce que j'ai écris ? Je décris la procédure.

    Philippe

  5. #5
    Membre averti
    Inscrit en
    Juillet 2009
    Messages
    23
    Détails du profil
    Informations forums :
    Inscription : Juillet 2009
    Messages : 23
    Par défaut J'ai suivi a la lettre
    ce que tu as dis,
    enfin j'ai du pas comprendre comment récupérer le code .
    Le fichier est bien importé ds la table , mais je le fais par menu et non par code.
    mais je n'arrive pas a retrouver le code vba qui génère l'importation.

    Aeef

  6. #6
    Membre averti
    Inscrit en
    Juillet 2009
    Messages
    23
    Détails du profil
    Informations forums :
    Inscription : Juillet 2009
    Messages : 23
    Par défaut Ok mais probleme
    J'ai compris, le problème ce sont des fichiers csv qui contiennent des données horaire en pas de 10 minutes sur une période de 6 mois donc 4320 fichiers au minimum.
    Il est impossible que je passe par le menu pour recuperer la Spécification d'importation il faut que je trouve le code en 2007 puisque en 2003 cala marche très bien

    As tu la solution ?

    Merci

  7. #7
    Invité
    Invité(e)
    Par défaut
    Re

    il n'y a aucun code VBA

    La procédure à suivre est la suivante :
    Citation Envoyé par Philippe JOCHMANS Voir le message
    Onglet Données Externes
    Groupe Importer puis Fichier Texte
    Sélectionne ton fichier et lance l'import
    Dans la fenêtre qui s'affiche tu fais Suivant, si tes données sont bien séparées c'est ok.
    Tu cliques sur le bouton "Avancé" en bas de la fenêtre
    Là tu fais "enregistrer sous", tu mets un nom que tu notes.
    Et le résultat :

    Ensuite tu mets ce nom dans ta commande, ce qui peut donner quelque chose de ce style.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.TransferText acImportDelim, "Classeur1 Spécification d'importation", "table1", "C:\Users\Philippe\Desktop\classeur1.csv", False
    Philippe

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Import de fichier Excel (CSV) dans MySQL
    Par mathieu77186 dans le forum Outils
    Réponses: 2
    Dernier message: 27/03/2006, 23h23
  2. Importer un fichier EXcel avec option "parcourir"
    Par marie10 dans le forum Access
    Réponses: 1
    Dernier message: 01/02/2006, 10h42
  3. Impossible d'importer un fichier excel
    Par _developpeur_ dans le forum Access
    Réponses: 2
    Dernier message: 24/01/2006, 12h21
  4. importer données fichier excel dans bd mysql
    Par Hydre dans le forum Administration
    Réponses: 1
    Dernier message: 05/10/2005, 19h39
  5. BDD Access et importation de fichier excel!
    Par Zetmurin dans le forum C++Builder
    Réponses: 13
    Dernier message: 03/02/2005, 11h34

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo