Pour ouvrir un classeur excel existant et remplir des cellules.
Dim xlapp As Excel.Application Set xlapp = New Excel.Application With xlapp .Visible = True .Workbooks.Open ("C:\Chemin d'acces\Classeur2.xls") .Cells(1, 1) = "texte à mettre dans cellule(1,1)" End With
zx10
|