cs_Willi
Messages postés2375Date d'inscriptionjeudi 12 juillet 2001StatutModérateurDernière intervention15 décembre 201822 3 nov. 2005 à 10:43
Lut,
Ouvre un nouveau projet vb ensuite ajoute la référence à la librairie Excel (menu projet -> référence et coche "microsoft excel xx.0 object librairy)
Essais le code suivant dans un bouton
8<------------------------------------------------------
Dim x As New Excel.Application
Dim w As Workbook
Dim ws As Worksheet
Set w = x.Workbooks.Open("c:\test.xls")
Set ws w.Worksheets(1) '1 feuille1