Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True objExcel.Workbooks.Add
For i = 1 to 56 objExcel.Cells(i, 1).Value = i objExcel.Cells(i, 1).Interior.ColorIndex = i Next
Proposer un script
|
Notre avis :

Votre avis :

Réactions : 0
Votants : 9
Visites : 12065
|