Ajout d'un enregistrement d'une feuille excel vers base de donnée AccessRésolu

Question

Bonjour,

    Je d&#233;sire regrouper dans Access des donn&#233;es se trouvants dans des feuilles excel
J'arrive bien &#224; lire les donn&#233;es source. 
(Utilisation de CREATEOBJECT("excel.application") et affectation du contenu des cellules
dans des variable)
J'arrive &#233;galement &#224; ajouter des valeurs FIXES dans ma table de BDD avec l'instruction
INSERT INTO
(avec: cnn.Open "provider=Microsoft.Jet.OLEDB.4.0; Data Source etc...
          cnn.Esecute " insert into table ....VALUE "_)

Le probl&#232;me est que je ne peux pas utiliser mes variables dans VALUE de l'instruction insert into.
Comment ajouter dans Access des enregistrements issus de cellules de feuilles Excel aves Visual Basic 6.0
Merci

mrdep1978 · Accepted Answer

Je ne comprends pas pourquoi tu ne peux pas utiliser tes variables dans le VALUES (attention, pas VALUE).
Moi, je fais comme &#231;a d'habitude :

dim xlapp as object
dim ls_Valeur1 as string
dim ls_Valeur2 as string
dim cnn as Connection
set xlapp =createobject("Excel.Application")
'Tu ouvres ton fichier etc ....
....
ls_Valeur1 = xlapp.worksheets("Feuil1").Range("A1").value
ls_Valeur2 = xlapp.worksheets("Feuil1").Range("B1").value

cnn.Execute "INSERT INTO maTable(champ1, champ2) " _
            & " VALUES ('" & ls_Valeur1 & "','" & ls_Valeur2 & "')"

fcorneville · Answer

Merci beaucoup pour ton efficacit&#233;, mon probl&#232;me est r&#233;solut !
je ne connaissais pas la syntaxe de ...VALUES ('"& valeur1 &"','"...);

Salutations
Fab.

Ajout d'un enregistrement d'une feuille excel vers base de donnée Access

2 réponses

Discussions similaires