使用颜色矢量一次填充单元格颜色

Question

我想将一个灰度图的RGB（0,0,0）颜色存储到RGB（255,255,255）的Long矢量中，然后将一个块单元颜色填充到Excel电子表格的一列中。 VBA宏中的最后一个命令不起作用。我得到的错误消息是：

  

运行时错误'13'：类型不匹配

我做错了什么？有什么建议？感谢

WorkflowEvents.SaveVersion.Before

Answer 1

我认为你不需要这么复杂的方法

Sub GreyMap()
    Dim i As Long
    For i = 0 To 255
        Range("C" & i + 1).Interior.Color = RGB(i, i, i)
    Next i
End Sub

Answer 2

经过反思，而不是实际回答它，我收回了我提出的问题，因为如果我想用单一颜色填充整个范围，那么我必须使用相同的命令，其中的RHS必须是标量，因此也不能成为矢量。

话虽如此，是否确实存在.interior.color语法的变体确实允许向量填充？