Demonstrationscriptthatdisplaysthevariouscolors--andtheirrelatedcolorindex--availablewhenprogrammaticallycontrollingMicrosoftExcel.
ScriptCode
复制代码 代码如下:
setobjExcel=CreateObject("Excel.Application")
objExcel.Visible=True
objExcel.Workbooks.Add
Fori=1to56
objExcel.Cells(i,1).Value=i
objExcel.Cells(i,1).Interior.ColorIndex=i
Next