bonsoir Jean , bonsoir Jean-Marie
j'espere que cet exemple pourra t'aider
pour ton projet tu pourras remplacer les données de l'USF par ta plage de cellules à exporter
par exemple :
Rs.AddNew
For j = 0 To 19
Rs.Fields(j) = Cells(1, j + 1)
Next j
Rs.Update
tu trouveras d'autres exemples sur le forum , realisés par Michel_M
bonne soiree
MichelXld [file name=EcrireClasseurFerme.zip size=16336]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/EcrireClasseurFerme.zip[/file]
Message édité par: MichelXld, à: 25/04/2005 22:53