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

Access Discussion :

Problème exportation table Access dans Excel


Sujet :

Access

  1. #1
    Membre à l'essai
    Profil pro
    Inscrit en
    Juillet 2004
    Messages
    30
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2004
    Messages : 30
    Points : 19
    Points
    19
    Par défaut Problème exportation table Access dans Excel
    Bonjour à tous,

    J'ai un problème dans access, lorsque je souhaite exporter plusieurs tables dans des fichiers excel.

    J'ai ce message d'erreur :
    "The Microsoft jet database engine could not find the object ''. Make sure the object exists and that you spell its name and the path name correctly."

    Mon code ressemble à ça :

    DoCmd.RunSQL "SELECT " & User & ".* INTO TMP FROM T INNER JOIN P ON (Right(T.[" & OrderColT & "], 8) = Right(P.[" & OrderColP & "], 8)) WHERE T.[" & QtyColT & "] <> P.[" & QtyColP & "]"
    DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "TMP", "C:\CompareTPOrderDiffQty.xls", True

    'SELECT P.* INTO TMP FROM T INNER JOIN P ON (Right(T.[Dealer O/N], 8) = Right(P.[NºAppProd#], 8)) WHERE T.[Ord Qty] <> P.[Qté ordre]

    DoCmd.RunSQL "SELECT " & User & ".* INTO TMP FROM " & User & " LEFT JOIN " & Other & " ON (Right(T.[" & OrderColT & "], 8) = Right(P.[" & OrderColP & "], 8)) WHERE " & Other & ".[" & IIf(Other = "P", OrderColP, OrderColT) & "] is null"
    DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "TMP", "\Liste" & User & "NonDans" & Other & ".xls", True

    'SELECT P.* INTO TMP FROM P LEFT JOIN T ON (Right(T.[Dealer O/N], 8) = Right(P.[NºAppProd#], 8)) WHERE T.[Dealer O/N] is null

    DoCmd.RunSQL "SELECT " & Other & ".* INTO TMP FROM " & User & " RIGHT JOIN " & Other & " ON (Right(T.[" & OrderColT & "], 8) = Right(P.[" & OrderColP & "], 8)) WHERE " & User & ".[" & IIf(User = "P", OrderColP, OrderColT) & "] is null"
    DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "TMP", "C:\Liste" & Other & "NonDans" & User & ".xls", True

    'SELECT T.* INTO TMP FROM P RIGHT JOIN T ON (Right(T.[Dealer O/N], 8) = Right(P.[NºAppProd#], 8)) WHERE P.[NºAppProd#] is null


    Les deux premiers exports se passent sans problème, le troisième ayant le message d'erreur, je ne vois pas où peut être le problème, auriez-vous une idée ?

    Pour info, j'utilise des variables sélectionnées par l'utilisateur pour mes requêtes, requêtes que j'ai testé à l'unité et qui marchent.

    Merci d'avance pour votre aide. Et pour déplacer ce message si je ne suis pas au bon endroit !

  2. #2
    Expert éminent
    Avatar de cafeine
    Inscrit en
    Juin 2002
    Messages
    3 904
    Détails du profil
    Informations forums :
    Inscription : Juin 2002
    Messages : 3 904
    Points : 6 781
    Points
    6 781
    Par défaut
    Hello,

    n'hésite pas à faire un Debug.Print de ton SQL, c'est un bon outil de déboguage.

  3. #3
    Membre à l'essai
    Profil pro
    Inscrit en
    Juillet 2004
    Messages
    30
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2004
    Messages : 30
    Points : 19
    Points
    19
    Par défaut
    C'est exactement ce que j'ai fait pour tester mes requêtes

  4. #4
    Expert éminent
    Avatar de cafeine
    Inscrit en
    Juin 2002
    Messages
    3 904
    Détails du profil
    Informations forums :
    Inscription : Juin 2002
    Messages : 3 904
    Points : 6 781
    Points
    6 781
    Par défaut
    l'erreur porte sur le SQL ou bien sur l'export ?
    si c'est le SQL, montre nous le debug.print

  5. #5
    Membre à l'essai
    Profil pro
    Inscrit en
    Juillet 2004
    Messages
    30
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2004
    Messages : 30
    Points : 19
    Points
    19
    Par défaut
    Nope, ça vient de l'export je pense, un problème de chemin ? Même si j'ai mis le chemin le plus court possible !

    Voilà les requêtes quand même

    SELECT P.* INTO TMP FROM T INNER JOIN P ON (Right(T.[Dealer O/N], 8) = Right(P.[NºAppProd#], 8)) WHERE T.[Ord Qty] <> P.[Qté ordre]

    SELECT P.* INTO TMP FROM P LEFT JOIN T ON (Right(T.[Dealer O/N], 8) = Right(P.[NºAppProd#], 8)) WHERE T.[Dealer O/N] is null

    SELECT T.* INTO TMP FROM P RIGHT JOIN T ON (Right(T.[Dealer O/N], 8) = Right(P.[NºAppProd#], 8)) WHERE P.[NºAppProd#] is null

  6. #6
    Membre à l'essai
    Profil pro
    Inscrit en
    Juillet 2004
    Messages
    30
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2004
    Messages : 30
    Points : 19
    Points
    19
    Par défaut
    J'ai retesté l'application, je n'ai plus d'erreur, alors que j'ai juste supprimé les fichiers de sortie pour qu'il les recréé !
    Je comprend pas, je verrais si le problème revient.

    Merci de ton suivi en tout cas

Discussions similaires

  1. Réponses: 1
    Dernier message: 17/11/2013, 00h20
  2. Insertion d'une table Access dans Excel
    Par acaly dans le forum IHM
    Réponses: 1
    Dernier message: 26/11/2009, 19h23
  3. export table access vers excel qui stoppe au niveau d'une table
    Par Dermochelys dans le forum VBA Access
    Réponses: 7
    Dernier message: 10/11/2009, 17h01
  4. Exporter formulaire Access dans Excel
    Par teti_chenille dans le forum Access
    Réponses: 6
    Dernier message: 28/02/2006, 17h40
  5. [VBA Excel] Importer des tables Access dans Excel
    Par loacast dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 06/12/2005, 11h44

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