在excel里面用vba能给单元格填充自定义的颜色吗？

> Sub xx()Dim c As RangeFor Each c In [e3:j16]Select Case Len(c)Case 10: x = 3Case 9: x = 6Case 8: x = 10Case 7: x = 5Case Else: x = xlNoneEnd Selectc.Interior.ColorIndex = xNextEnd Sub

顶一下

(0)

0%

踩一下

(0)

0%