Ton problème est tout simple. Tu reprends la procedure automation.
Tu ouvres ton classeur source (ou tu as tes valeurs à récupérer)
Dim wbfile as workbook
Dim a as variant
Dim b as variant
'...ouverture excel etc.
set wbfile = Xls.workbooks.open("monclasseur.xls")
' Récupération de la valeur a
a = wbfile.sheets("toto").range("A1")
' Récupération de B
b = wbfile.sheets("toto").range("B1")
' On a les données voulues plus besoin excel
wbfile.close False 'aucune modif
set wbfile = nothing
xls.application.close
set xls = nothing
' verifie qu'on a des nombres
if isnumeric(a) and isnumeric(b) then
currentdb.execute "INSERT INTO MATABLE(VALEUR_A,VALEUR_B,VALEUR_C) SELECT " & _
a & " as vA," & b & "as vB," & cdbl(a-b) & " as vDiff"
end if
J'ai tapé ca à la va-vitedonc il peut y avoir des erreurs mais en gros c'est le principe. Donc oui tu peux récupérer des valeurs d'une cellules excels tout comme l'inverse, il n'y a aucun problème entre Excel et Access et c'est bien une des qualités principales de ses produits.