bonjour Zouille,CocoLapin,le Forum
pourquoi pas Ado,écrire dans un fichier fermé
c'est un exemple si tu me donnes les renseignements je te l'arrange
après les fêtes que je souhaite à toutes et à tous excellentes
Sub CommandButton1_Click()
'dans vba menu outils -> références -> cocher Microsoft ActiveX
'Data Object 2.X x=chiffre version
'le chemin complet du fichier
fichDest = 'D:\\OLE_Test.xls'
'Open the ADO connection to the Excel workbook
Set oConn = New ADODB.Connection
oConn.Open 'Provider=Microsoft.Jet.OLEDB.4.0;' & _
'Data Source=' & fichDest & ';' & _
'Extended Properties=''Excel 8.0;HDR=NO;IMEX=2;'''
'Add values to individual cells
oConn.Execute 'Insert into Cible (F1) Values ('Fredo')'
'Close the connection
oConn.Close
'Open the workbook to examine the results
DoEvents
Workbooks.Open fichDest
End Sub
à bientôt