Discussion :

[pierreca]

j'utilise, dans de nombreux programmes que j'ai développés sous access, "transfertspreadsheet" pour m'interfacer avec des données excel,
jusque la sans trop de problemes.
Je tente aujourd'hui de récuperer des données d'un tableau excell vers access. le fichier excel comporte plusieurs feuilles et des liens entres les cellules

j'ai le message laconique de VB: "impossible de decoder le fichier".

si j'ouvre préalablement sous excell ce tableau,
je ne reussi qu'à recuperer qu'une seule feuille (la premiere feuille) dans mon fichier access.

L'aide en ligne de access est tres laconique à ce sujet..........

[helas]

Un exemple de lecture de cellules enregistrées dans une table lorsque TransferSpreadsheet est inefficace

rem ---------------------------------------------
Dim xlA As Object, xlW As Object, t As DAO.Recordset

Set xlA = CreateObject("excel.application")
xlA.Visible = True

xlA.workbooks.Open (fichier)

Set xlW = xlA.activeworkbook
Set t = CurrentDb.OpenRecordset("tbImportation")
ligne = 5
Do
t.AddNew
for colonne=1 to 10
t(colonne-1) = xlW.sheets("Feuil2").cells(ligne, colonne)
next colonne
t.Update
ligne = ligne + 1
Loop
t.Close

xlA.activeworkbook.Close acQuitSaveNone
xlA.Quit
Set xlA = Nothing
rem ---------------------------------------------