Discussion :

[Jordmund]

Bonjour,

Je souhaite utiliser un recordset dans une base Access. Ce recordset s'applique sur une feuille Excel et vise à importer les données Excel dans Access.

Mon problème est que les données source Excel sont redondantes, j'ai N enregistrements pour le même niveau de données.
Cette contrainte peut etre levée par l'équivalent d'un "GROUP BY" sur les données Excel lors de la déclaration de mon recordset.

Mais je n'y arrive pas.

Mon code

Code :

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

1
2
3
4
5
6
 
' Ouvre le recordset Excel 
Set rstExcel = New ADODB.Recordset
rstExcel.CursorType = adOpenKeyset
rstExcelLockType = adLockOptimistic
rstExcel.Open "plage_donnees", cnx_excel, , , adCmdTable

Je tente un

Code :

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

1
2
3
 
req_excel = "SELECT * FROM " & plage_donnees & " ORDER BY [mon_info_redondante];"
Set rstExcel_sans_redondance = mabase.OpenRecordset(req_excel, dbOpenSnapshot)

Mais ca ne marche pas.
Avez vous des idées ?

Merci d'avance de vos réponses.

[fgiambelluco]

Bonjour
ORDER BY : c'est pour le tri
Pour le regroupement c'est plutôt GROUP BY.

Par contre le regroupement ne fonctionne pas avec *, il faut énumérer tout les champs à récupérer.

Une autre solution aurait consisté à importer le fichier Excel dans une table temporaire, sur laquelle on ferait le regroupement.