首页 > 解决方案 > 如何为B列中的56个单元格着色

问题描述

如何编写一个代码,用颜色索引函数-> cells.interior.colorindex 为 B 列中的 56 个单元格着色 56 种颜色

标签: excelvba

解决方案


使用以下代码:

Sub colorCells()
     For i = 1 To 56
        Range("B1").Offset(i - 1, 0).Interior.ColorIndex = i
     Next i
End Sub

推荐阅读