Excel-教程-技巧-培训视频
Excel中交流网 联系方式
QQ:18449932
网 址:www.excel-cn.com
你知道EXCEL有多少个颜色吗?
用以下代码可以自动排列出颜色。
代码如下:
Sub 颜色大全()
Dim I%, j%, k%
k = 1
For j = 1 To 16 Step 2
For I = 1 To 7
Cells(j, I).Interior.ColorIndex = k
Cells(j + 1, I) = k
k = k + 1
Next I
Next j
End Sub