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

Macros et VBA Excel Discussion :

Erreur requête classeur fermé


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    consultant BTP
    Inscrit en
    Février 2012
    Messages
    51
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : consultant BTP
    Secteur : Bâtiment

    Informations forums :
    Inscription : Février 2012
    Messages : 51
    Par défaut Erreur requête classeur fermé
    Bonjour
    J'ai un problème pour écrire dans un classeur fermé le code que j'utilise incrit bien une ligne comme je veux sauf que cela me change le format d'écriture et me rajoute le caractère ' audebut de chaque format de texte inscrit.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
     
    fichier = "ooo"
    NomFeuille = "ooo"
    num_essai = "MAS240713"
     
    Set Cn = New ADODB.Connection
    '--- Connection ---
        With Cn
            .Provider = "Microsoft.Jet.OLEDB.4.0"
            .ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" _
                & Fichier & ";Extended Properties=""Excel 12.0;HDR=YES;"""
            .Open
        End With
    texte_SQL = "INSERT INTO [" & NomFeuille & "$]([Echantillion],[A1],[A2],[A3],[A4],[A5],[A6],[A7],[A8],[A9],[A10],[A11],[A12],[A13],[A14],[A15],[A16],[A17],[A18],[A19],[A20],[A21],[A22],[A23],[A24],[A25],[A26],[A27],[A28],[A29],[A30],[A31],[A32],[A33],[A34],[A35],[A36],[A37],[A38],[A39],[A40],[A41],[A42],[A43],[A44]) " & _
        "VALUES ( " & "'" & num_essai & "', '" & _
        "Essai " & "', " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null" & ", " & "Null" & ", " & "Null" & ", " & _
        "Null)"
     
    Set Rst = New ADODB.Recordset
    'MsgBox texte_SQL
    Set Rst = Cn.Execute(texte_SQL)
    Cn.Close
    Set Rst = Nothing
    Probléme lorsque l'essai en question est ecris dans le classeur fermé le numéro d'échantillon devient 'MAS240713 au lieu de MAS240713.
    he là c'est le drame impossible de le retrouver avec un select approprié.

    Si quelqu'un a déjà eu se problème merci de m'eclairer.

  2. #2
    Expert confirmé
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2013
    Messages
    3 609
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Alimentation

    Informations forums :
    Inscription : Mai 2013
    Messages : 3 609
    Par défaut
    Bonjour,

    Je ne suis pas sûr de ce que j'avance..., mais as-tu essayé en doublant les apostrophes ?

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    "VALUES ( " & "''" & num_essai & "'', '" & _

  3. #3
    Membre averti
    Homme Profil pro
    consultant BTP
    Inscrit en
    Février 2012
    Messages
    51
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : consultant BTP
    Secteur : Bâtiment

    Informations forums :
    Inscription : Février 2012
    Messages : 51
    Par défaut
    je viens d'essayer cele me donne une erreur de syntaxe (opérateur absent) dans l'espression ''MAS240713''

    Ce que je ne comprend pas c'est que il y a un mois il ni avait pas de caractére ' en plus et tout d'un coup il est apparu vraiment comme par magie...

  4. #4
    Membre averti
    Homme Profil pro
    consultant BTP
    Inscrit en
    Février 2012
    Messages
    51
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : consultant BTP
    Secteur : Bâtiment

    Informations forums :
    Inscription : Février 2012
    Messages : 51
    Par défaut
    apres plusieurs tentatives je tourne toujours en rond est ce que le problème ne viendrai pas d'un parametrage de excel lui meme ?

Discussions similaires

  1. [XL-2007] Requête OLEDB, écriture contenu d'un array dans un classeur fermé
    Par Vorens dans le forum Macros et VBA Excel
    Réponses: 9
    Dernier message: 20/06/2012, 00h15
  2. [XL-2003] Requête classeur fermé - La table externe n'est pas au format attendu
    Par Blencastreur dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 03/05/2012, 10h50
  3. [XL-2003] Comment fusionner tous les classeurs fermés, erreur d'éxécution
    Par banyan dans le forum Macros et VBA Excel
    Réponses: 11
    Dernier message: 11/12/2011, 17h47
  4. Actualisé requête dans classeur fermé.
    Par bobinette33 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 07/07/2010, 19h03
  5. Requête sur un classeur fermé
    Par Avtomav dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 13/08/2009, 17h48

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