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 :

Problème d'import d'un fichier Excel


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Femme Profil pro
    Chef de projet informatique
    Inscrit en
    Juillet 2008
    Messages
    115
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 41
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : Chef de projet informatique
    Secteur : Service public

    Informations forums :
    Inscription : Juillet 2008
    Messages : 115
    Par défaut Problème d'import d'un fichier Excel
    Bonjour à tous,

    Me re voilà sur le forum pour un problème que je ne comprends pas.
    Je veux importer un fichier Excel dans ma base Access (dans une table qui existe et dont les champs sont les mêmes que les en têtes du fichier Excel).
    J'ai déjà fait ça sur un autre projet et tout fonctionne à merveille, j'ai donc copié/collé mon code en changeant le nom de mon fichier Excel et le nom de la table. Mon code fonctionne mais le problème est que ça m'importe les 65000 lignes d'Excel hors seulement une centaine sont renseignés. Dans mona ncien projet ça ne m'importe que les lignes renseignées et là bin il m'importe tout
    Je vous donne mon code :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
        'On lance la macro du fichier Excel
        Set ApplicationExcel = CreateObject("Excel.Application")
        With ApplicationExcel
        .Visible = False
        .Workbooks.Open ("C:\Transfert\reception.xls")
        .Run ("reception.xls!preparation_donnees")
        End With
        ApplicationExcel.Application.Quit
        Set ApplicationExcel = Nothing
        'On lance la macro import qui importe le fichier excel dans la table BDC
        stDocName = "import"
        DoCmd.RunMacro stDocName
    J'ai mis également l'aperçu écran de ma macro "import"
    En espérant qu'un quelqu'un arrive à trouver le mystère ! Mois je m'arrache les cheveux depuis ce matin et il ne m'en reste plus bcp
    Merci
    A+
    Images attachées Images attachées  

  2. #2
    Membre chevronné
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    357
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2006
    Messages : 357
    Par défaut
    Bonjour,

    Vous etes en access et vous souhaitez importer un fichier Excel ?

    Pourquoi ne pas passer par un docmd.transfertspreadSheet ?

    Vous pouvez aussi mettre une clé primaire dans la table vers laquelle vous allez importer les données comme ca les valeurs nulles seront ignorées.

  3. #3
    Membre confirmé
    Femme Profil pro
    Chef de projet informatique
    Inscrit en
    Juillet 2008
    Messages
    115
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 41
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : Chef de projet informatique
    Secteur : Service public

    Informations forums :
    Inscription : Juillet 2008
    Messages : 115
    Par défaut
    Bonjour Access Newbie,
    merci pour ton aide, j'ai également essayé avec docmd.transfertspreadSheet de cette manière
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "dossier", "C:\Transfert\reception.xls", True, "dossier!"
    Et j'ai le même résultat, c'est à dire l'importation des 65000 lignes mais peut être je me suis mal servie de la fonction ??
    Merci
    A+

  4. #4
    Membre chevronné
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    357
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2006
    Messages : 357
    Par défaut
    Et en mettant une clé primaire ?

    Sinon y a la solution du bourrin, tu importe tes 65000 lignes, puis tu delete partout ou tu as des null sur plus d'une colonne.

  5. #5
    Membre confirmé
    Femme Profil pro
    Chef de projet informatique
    Inscrit en
    Juillet 2008
    Messages
    115
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 41
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : Chef de projet informatique
    Secteur : Service public

    Informations forums :
    Inscription : Juillet 2008
    Messages : 115
    Par défaut
    Non je n'ai pas testé avec une clé primaire je vais faire de ce pas.
    Et la version bourrin j'y ai également pensé... Mais j'aimerai bien l'éviter !
    Merci
    A+

  6. #6
    Membre confirmé
    Femme Profil pro
    Chef de projet informatique
    Inscrit en
    Juillet 2008
    Messages
    115
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 41
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : Chef de projet informatique
    Secteur : Service public

    Informations forums :
    Inscription : Juillet 2008
    Messages : 115
    Par défaut
    ça ne fonctionne pas non plus avec un id... je n'en peu plus de cette macro !
    Mais on va y arriver !
    Merci
    A+

Discussions similaires

  1. Réponses: 1
    Dernier message: 12/08/2014, 15h43
  2. Réponses: 6
    Dernier message: 05/07/2013, 13h58
  3. [AC-2003] Problème d'importation d'un fichier Excel dans une application ACCES
    Par zahira87 dans le forum VBA Access
    Réponses: 3
    Dernier message: 05/03/2013, 14h08
  4. Problème lors de l'import d'un fichier excel
    Par mattyeux dans le forum MS SQL Server
    Réponses: 2
    Dernier message: 20/11/2007, 14h26
  5. Réponses: 7
    Dernier message: 23/11/2005, 18h20

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