Discussion :

[Acarp47]

Bonjour à tous.

Je souhaite récupérer certaines données d'un fichier excel et les placer dans une table. Ce traitement est déclenché par un bouton dans un formulaire.
Le fichier excel est très volumineux (60,000 lignes).

Je procède de la manière suivante (j'ai simplifié car il y a 24 champs):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
    Set xlApp = CreateObject("Excel.Application")
    Set xlBook = xlApp.Workbooks.Open(Me.Txt_Path.Value)
    Set xlSheet = xlBook.sheets("onglet1")
 
While xlSheet.Cells(i, 2).Value <> "" And i < 65535
rqst = "insert into ma_table (champs1, ... ,Champ24)" & _
"values (" & _
"" & une_fonction(xlSheet.Cells(i, 1).Value, un parametre) & _
"" & xlSheet.Cells(i, 1).Value & ")"
 
docmd.runsql(rqst)
Wend

En gros je construit une requete en texte en allant chercher des valeurs dans la feuille excel, puis j'execute la requete d'insertion.

Ca marche, mais les performances sont dramatiques (j'ai arreté les frais au bout d'une demi-heure alors que j'en étais environ à la moitié!)

Aurriez vous des idées pour améliorer la performance?

J'avais eu le meme probleme dans le sens inverse (copie de valeurs d'access vers une feuille excel). Je l'avais résolu avec un CopyFromRecordSet, mais malhereusement, il n'existe pas de "copytorecordset" !

Merci à vous

[cafeine]

Hello,

tu peux lier un fichier excel dans Access sous forme de table, il te suffira ensuite de faire une requête création de table ...

[Acarp47]

Hello,

tu peux lier un fichier excel dans Access sous forme de table, il te suffira ensuite de faire une requête création de table ...

Tu veux dire importer la feuille excel dans une table? Peut on déclencher cela par du code vba?

En tous cas, merci pour ta réponse!

Edit :
voila ma réponse qui vient directement de ton tuto (a peine modifiée)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, "Ma_table", Me.Txt_Path.Value, True

yapuka faire une jolie requete pour mettre tout ce beau monde en forme!

Merci

[cafeine]

ça c'est un import, mais tu peux aussi juste lier ... ce qui présente l'avantage de t'épargner de faire grossir ta base ...