Salut !
pour ouvrir Excel :
Set xlApp = New Excel.Application
Set xlBook = xlApp.Workbooks.open(CheminDuFichier)
Set xlSheet = xlBook.ActiveSheet
Récupérer des données:
Cells(Row,Col).value
Pour fermer le classeur et le processus Excel :
xlbook.quit
xlapp.close
Set xlApp = Nothing
Set xlBook = Nothing
Set xlSheet = Nothing
Mais pour le recordset faut que tu passe par ta base dans créer une requete pour tous enregistrer ( INSERT INTO ou UPDATE )
KC62
On a pas toutes les solutions de tous les probleme mais chaque probleme à ses solutions ...
|